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Gomputerbücher 


Arne Schäners 





1985, 305 S., 6 Abb., kart., 

DM 58, - , ISBN 3-7785-1150-5 
Begleitdiskette DM 48, — 
doppelseitig beschrieben 

ISBN 3-7785-1290-9 

Dieses Buch wendet sich als lehr- 
buchhafter Kurs an alle, die pro- 
fessionelle hochaufgelöste Grafi- 
ken auf dem Apple erzeugen wol- 
len. Der erste Teil beginnt mit ei- 
nem Abriß des Aufbaus der HGR- 
Seiten aus der Sicht des Program- 
mierers. Danach wird das Pro- 
gramm HRCG (HI-RES Character 
Generator, Apple, Inc.) eingehend 
analysiert, und es werden sinnvol- 
le Ergänzungen vorgestellt. 
Schrittweise wird die Nutzung des 
HRCG erarbeitet bis hin zur belie- 
bigen Bewegung eines statisti- 
schen Objekts auf einer der HGR- 
Seiten. 

Der zweite Teil baut auf dem er- 
sten auf und führt über die Defini- 
tion mehrerer Objekte und simul- 
taner Bewegung hin zu einem Ar- 
cade-Spiel, das für die meisten 
kauflichen Action-Spiele in der 
meisterhaften Grafik als Vorbild 
dienen kann. Grundkenntnisse in 
6502-Assembler sollten vorhan- 
den sein. 


DU] Schäpers, Bewegte Apple Grafik, 


ISBN 3-7785-1150-5, DM 58, — 


[1 Begleitdiskette, DM 48, — 
ISBN 3-7785-1290-9 
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Versionen 1.0.11, 102, 1.1.1 








1985, 470 S., kart., DM 68, — 
ISBN 3-7785-1134-3 


„Die ProDOS Analyse“ ist die um- 
fangreichste und detaillierteste 
Darstellung, die jemals ein Apple- 
Betriebssystem erfahren hat. 

Wer die „Innereien“ von ProDOS 
bis zum letzten Byte, z.T. bis ins 
letzte Bit kennenlernen möchte, 
braucht dieses Buch. Das kom- 
plette Betriebssystem (Urlader, 
MLI, Disk-Driver, RAM-Disk-Dri- 
ver und Uhr-Routine) mit Ausnah- 
me des BASIC-SYSTEM wird mit 
umfangreichen Kommentaren 
und Übersichtstabellen disas- 
sembliert. 

Auch die nicht im „Technical 
Reference Manual“ aufgeführten 
Eigenschaften von ProDOS wer- 
den analysiert und beschrieben, 
z.B. die vertrackten eingebauten 
Testroutinen zur Identifikation der 
verschiedenen Apple II Modelle 
und eventueller Nachbaugeräte. 
Programmierer, die ProDOS ver- 
sionsabhängig „patchen“ möch- 
ten, erhalten hier den genauen 
Überblick, wo was geändert wer- 
den muß, damit dies keine negati- 
ven Konsequenzen hat. 


[1 Schäpers, Pro-DOS-Analyse 
ISBN 3-7785-1134-3, DM 68, — 








Arne Schäpers, Das BASIC SYSTEM, 1986, ca. 300 S., 
kart., DM 54, — ISBN 3-7785-1407-5 

Sie wollen die erweiterten Möglichkeiten von ProDOS 
und dem BASIC-SYSTEM voll ausnutzen? Nur hier fin- 
den Sie 

EM das Lesebuch: eine schrittweise Erklärung der Zu- 
sammenarbeit zwischen Applesoft und dem Monitor, 
des Aufbaus der Stringverwaltung, mögliche Umleitun- 
gen der Ein-/Ausgabe und der Eingriffsmöglichkeiten in 
diese Abläufe. Die gezeigten Mechanismen werden 
durch zahlreiche (und sehr kurze) Beispielprogramme 
untermauert; 

Mi die Analyse: eine minutiöse Sezierung des BASIC- 
SYSTEM zusammen mit der Kommandoschnittstelle zu 
ProDOS. Die Hauptfunktionen (Vektorbehandlung, 
TRACE-Kontrolle, FRE-Kommando, Global Page und 
benutzte Speicherstellen) sind jeweils in eigenen Ab- 
schnitten erläutert, ein kommentiertes Listing schließt 
diesen Teil ab; 

MB Tips & Tricks: die verborgenen Möglichkeiten des BA- 
SIC-SYSTEM („Input Anything“, andere Dateinamen als 
STARTUP, RESET ohne CLEAR), der Aufbau „externer 
Kommandos“. Dieser Teil enthält ein komplettes Rah- 
menprogramm für die Erstellung eigener Kommandos 
sowie die Erweiterung MONITOR, mit der (analog zu DOS 
3.3) die Ausgabe von Kommandos und der Dateiverkehr 
auf dem Bildschirm sichtbar gemacht werden können. 


| Arne Schäpes 


Das 
BASIC SYSTEM 


L1 Schäpers, Das BASIC-SYSTEM, 
ISBN 3-7785-1407-5, DM 54, — 
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Neue Preise ab 1.2.1987 


Normale Peeker-Sammeldisketten 

#1, #2, #3”, 34, #5”, #6, #7, #9*, #10, 
#11, #12, #13, #14, #15, #17, #18, #19, 
#21, #22, #23, #24, #25, #27 

je Diskeite DM 22,— 

* (fast) vergriffen 


Spezielle Peeker-Sammeldisketten 


#8 mit Diversi-DOS, DM 26,— 
#16 mit Macroeditor, DM 26,— 
#20 mit Pic-Edit, DM 26,- 
#26 mit Dossembler, DM 26,— 
Software mit Handbüchern 
Fast-Writer 
ProDOS-Version, DM 98,— 
DOS-3.3-Version, DM 98,- 
Turtle-Graphics-Paket, DM 98,- 
Superquick, DM 38,— 
DISK40, DM 38,- 
INPUT 2.0, DM 38,— 
ProDOS-Editor, DM 38,— 
Double-Hires-Tools 
Applesoft-Version, DM 28,— 
Kyan-Pascal-Version, DM 28,- 
vergriffen 
Softbreaker 
Superplot 


Turtle-Graphics-Quelltexte 
Pic-Edit-Quelltexte 


Kyan-Pascal mit Tools 


keine Preisänderungen, jedoch nur noch lie- 
ferbar, solange Vorrat reicht 


Wir möchten Ihnen heute mitteilen, daß der 
Peeker mit dem März-Heft eingestellt wird, 
denn der Apple Il ist in Deutschland seit Mitte 
1985 nach und nach durch andere Geräte ver- 
drängt worden, insbesondere durch die IBM- 
PCs im Profi-Bereich und die Atari-Computer im 
Privat-Bereich. Der Apple Ilgs hat die in ihn ge- 
setzen Erwartungen leider nicht erfüllt, denn 
nach der Pressemitteilung vom 15.9.1986 ist 
das designierte Nachfolgemodell für den Apple II 
sprichwörtlich in der Versenkung verschwun- 
den. Einer der Gründe hierfür ist ein defekter 
Custom-Chip, der wegen der Flat-Pack-Bauweise 
nicht einfach durch einen neuen Baustein er- 
setzt werden kann, zumal das Redesign eines 
Custom-Chips nicht von heute auf morgen von- 
statten geht. Laut „PC-Woche“, Heft 1/1987, 
müssen deshalb bei den bereits in den USA 
ausgelieferten 25000 Geräten die gesamten 
Platinen ausgetauscht werden. Dies führt natur- 
gemäß zu Verzögerungen bei der Software-Ent- 
wicklung bis weit über. die Mitte dieses Jahres 
hinaus. Dann werden jedoch 32-Bit-Rechner, 
z.B. von Atari und IBM, auf den Markt drängen, 
so daß an einem 8/16-Bit-Zwitter in der Art des 
IIgs keiner mehr interessiert sein wird. 

Es verwundert deshalb nicht, daß von den 180 
potentiellen, deutschen Soft- und Hardware- 
Entwicklern, die wir vor Weihnachten ange- 
schrieben haben, nur 3 Firmen Iigs-Produkte in 
Arbeit haben. Auch unseren 800 Kyan-Club- 
Mitgliedern müssen wir leider mitteilen, daß das 
IIgs-Kyan-Pascal-Projekt wegen der unsicheren 
IIgs-Zukunft nicht mehr weiterverfolgt wird. 
Aus alledem wird verständlich, daß wir den 
Peeker nicht mehr fortführen können. Für die 
beiden letzten Hefte haben wir uns jedoch noch 
einige Bonbons ausgedacht, die Ihnen den Ab- 
schied versüßen sollen. Auf unseren Sammel- 


disketten #25 bis #27 (Januar bis März) er- 
scheinen der professionelle 6502-Assembler 
„DOSSEMBLER“ von Steffen Holzinger sowie 
das Dateiprogramm „DB-Meister“. Ferner 
konnten wir mit der Firma Frank & Britting ein 
neues, sehr günstiges Festplatten-Angebot 
aushandeln, das jedoch bis zum 31.3. 1987 be- 
fristet ist. Schließlich haben wir die Preise für 
die Produkte aus dem Hüthig Software Service 
per 1.2.1987 gesenkt. Beachten Sie jedoch 
auch hier, daß die Programme nur noch eine 
begrenzte Zeit lieferbar sein werden, so daß Sie 
sich vorsorglich bis Ende März eindecken soll- 
ten. 

Einige bereits geplante Projekte werden nicht 
mehr realisiert. Dazu gehört insbesondere der 
GFABASIC-Kompaktkurs sowie die in diesem 
Zusammenhang angekündigte Übungsdiskette. 
Auch die Hilfsprogramme und Quelltexte zum 
„DB-Meister“ werden nicht mehr veröffentlicht. 
Die Haupt-Module sind jedoch auf den Sam- 
meldisketten #25 bis #27 enthalten. Ferner 
wird der 65816-Kurs noch komplett erscheinen, 
da er von allgemeinem Interesse ist. Im übrigen 
haben wir auch das Peeker-Aufsatzverzeichnis 
fortgeführt, das für die Monate 10/1986 bis 3/ 
1987 auf der Sammeldiskette #27 enthalten 
sein wird. 

Die Atari-ST-Besitzer unter unseren Peeker- 
Lesern wird es freuen zu erfahren, daß ab Fe- 
bruar 1987 in unserem Verlag ein „schnelleres 
ST-Diskettenmagazin“ namens „FaSTer Disk 
Mag“ erscheinen wird, das nur in Diskettenform 
erhältlich ist und neben ST-Programmen mit 
entsprechender Dokumentation auch beispiels- 
weise Einführungskurse zu Pascal und © als 
Textfiles enthalten wird (Preis für 1 „FaSTer 
Disk Mag"-Diskette DM 24,80; Preis für 6 Dis- 
ketten DM 130,—). 


Hi dreee en 


Ulrich Stiehl 
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von Steffen Holzinger 
Bedienungsanleitung 


Der DOSSEMBLER, den nur Fortset- 
zungsbezieher der Sammeldisketten als 
Treueprämie automatisch mit der Ssammel- 
disk #26 zu diesem Heft 2/87 zusätzlich 
erhalten, ist ein vollständiger 6502/ 
65C02-Assembler, der unter dem Pro- 
DOS-Betriebssystem läuft und somit ei- 
nen 64K-Apple-Ii+ (mit oder ohne Videx- 
Karte) oder einen Ile/c (mit oder ohne 80- 
Zeichenkarte) voraussetzt. Da die Sam- 
meldisk #26 im DOS-3.3-Format vorliegt, 
verfahren Sie wie folgt: 

1. Dateien ASM.SYSTEM (= eigentlicher 
DOSSEMBLER-Editor/Assembier) und 
ASM.GP (DOSSEMBLER-Global-Page) 
mit CONVERT oder DOSTOPRO auf Ihre 
ProDOS-Arbeitsdiskette konvertieren. 

2. Da durch die Konvertierung BIN- 
Dateien entstehen, müssen Sie diese in 
SYS-Dateien umwandeln: 

BLOAD ASM.SYSTEM, A$2000 

DELETE ASM.SYSTEM 

CREATE ASM.SYSTEM, TsYsS 

BSAVE ASM.SYSTEM, TSYS, A$2000, 
114848 

BLOAD ASM.GP, A$0300 

DELETE ASM.GP 

CREATE ASM.GP, TSYS 

BSAVE ASM.GP, TSYS, A$0300, L144 
Danach können Sie den DOSSEMBLER 
mit 

-ASM.SYSTEM 

starten. Dies sollten Sie jetzt auch tun, 
damit Sie die nachfolgende Anleitung 
Schritt für Schritt nachvollziehen können. 
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DOSSEMBLER 


Ein ProDOS-Editor- 
Assembler fur den 





Apple II 


1. Datumeingabe 


Ist eine Hardware-Uhr eingebaut, so wird 
nach dem Start des Assemblers (s.o.) de- 
ren Datum und Zeit angezeigt und ver- 
wendet. Ist in einem vorherigen System- 
programm (z.B. Appleworks) das Datum 
definiert worden, wird es angezeigt und 
kann bei Bedarf verändert werden. War 
vorher kein Datum definiert (z.B. nach 
dem Booten), kann der Benutzer das Da- 
tum eingeben, wobei das Geburtsdatum 
des Programmautors als Beispiel dient. 
Unkorrekte Eingaben werden mit einem 
Piepser qauittiert und können wiederholt 
werden. Danach erscheint am Bildschirm 
das Hauptmenü. 


2. Hauptmenü 
2.1. Eingaben im Hauptmenü 


Verlangt das Hauptmenü eine Eingabe 
(z.B. eines Pfadnamens), so verfährt die 
Eingaberoutine wie folgt: 

— |st ein Vorgabewert vorhanden, kann er 
durch „Return“ vollständig übernommen 
werden oder mit— editiert werden. 

— Die Pfeiltasten < und > bewegen den 
Cursor, die Del-Taste (bzw. Otrl-P beim 
Apple Il+) löscht das Zeichen links vom 
Cursor. 

— „Return“ übernimmt die gesamie Zeile 
unabhängig von der Cursorposition, wäh- 
rend Ctrl-T ab der Cursorposition ab- 
schneidet. 

—- Wird ein Pfadname verlangt, akzeptiert 
das Programm nur Buchstaben, Ziffern so- 
wie Punkt (.) und Schrägstrich (/). 











— Die maximale Eingabelänge beträgt beim 
AO-Zeichen-Terminal 22 Zeichen, beim 
80-Zeichen-Terminal 40 Zeichen. 

— Durch Drücken von „Esc“ kann die Ein- 
gabe gestrichen werden. 


2.2. Hauptmenü-Optionen 


Die Optionen des Hauptmenüs werden 
durch Tippen des jeweiligen Anfangs- 
buchstabens ausgewählt. 


<W> Work-File definieren: 

Existiert der angegebene File, wird er ge- 
laden. Existiert er nicht, erscheint „New 
file“. 

<M> Main-File definieren: 

Der „Main-File“ ist die Hauptdatei einer 
Anzahl von Include-Files und wird, falls 
definiert, vom Assembler als Anfangsdatei 
verstanden. Ist er nicht definiert, benutzt 
der Assembler den Work-File (analog zu 
Turbo-Pascal). 

<P> Präfix ändern: 

Mit diesem Befehl kann das momentane 
ProDOS-Präfix geändert oder gelöscht 
werden. Das Programm prüft nach, ob das 
betreffende Directory auffindbar ist. 

<E> In den Editor gehen: 

Falls kein Work-File definiert ist, wird zu- 
nächst <W> ausgeführt. Danach wird der 
eigentliche Editor aufgerufen. 

<A> Den Assembler aufrufen: 

Falls weder Work-File noch Main-File defi- 
niert sind, wird nach dem Source-File ge- 
fragt. Danach fragt Dossembler nach dem 
Namen des ersten erzeugten Object-Files. 
Vorgabewert ist, falls der Platz ausreicht, 
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der Source-Name und das Suffix 
„.OBJ0”. Je nach den für die Assemblie- 
rung gewählten Ausgabekanälen fragt das 
Programm noch nach dem Namen des 
Listing-Files. Vorgabewert ist der Source- 
Name mit dem Suffix „.PRN“. Nach dieser 
Prozedur wird der eigentliche Assembler 
aufgerufen. 

<O> Ausgabekanäle wählen: 

Für den Editor und das Assembler-Listing 
können voneinander unabhängige Ausga- 
bekanäle ein- und ausgeschaltet werden. 
Dazu gehören der Bildschirm, ein eventu- 
ell vorhandener Drucker und (beim As- 
sembler) ein Listing-File. Mit „Y“ und „N“ 
Kann jeweils ein- und ausgeschaltet wer- 
den, „Return“ bestätigt die Wahl. Wird der 
Drucker angewählt, so muß er bereits 
hardwaremäßig eingeschaltet sein. 

<S> Work-File speichern: 

Speichert den im Speicher befindlichen 
Work-File auf Diskette. 

<D> Directory ausgeben: 

Eingabe des Directory-Pfadnamens. Vor- 
gabewert ist das definierte Präfix. Durch 
Eingabe von „#s,d“ kann das Volume- 
Directory der Unit in Slot s, Drive d ausge- 
geben werden. Ist das Directory etwas 
länger, wird es in verschiedene Bild- 
schirmseiten aufgeteilt. Dabei kann jeweils 
mit „Esc” abgebrochen werden. Ist der 
Drucker durch die <Ö>-Option einge- 
schaltet worden, wird das Listing auf dem 
Drucker ausgegeben. 

<Q> Programm verlassen: 

Das Programm springt In die ProDOS-Re- 
boot-Kommando-Routine; eine neue An- 
wendung kann ausgewählt werden. 


2.3. Hauptmenü-Fehlermeldungen 


2.3.1. Allgemeine Fehlermeldungen 

Zu den allseits bekannten Fehlermeldun- 
gen gehören „//O Error“, „Write protec- 
ted“, „Volume or directory not found“, 
„File not found“, „File locked“ sowie 
„Volume full”. Ihre Bedeutung muß hier 
nicht näher beschrieben werden. 


2.3.2. Spezielle Fehlermeldungen 

„File too large” erscheint, wenn versucht 
wird, einen File einzuladen, der länger als 
der momentan verfügbare Speicher ist. 
„Wrong file type” bricht den Versuch ab, 
einen File einzuladen, der nicht vom Typ 
„Brest 

„Not a directory file“ tritt auf, wenn ver- 
sucht wird, einen File als Directory auszu- 
geben, der weder vom Typ „DIR“ noch 
ein Volume-Directory ist. 

„DOS Error! Code = $xx“ erscheint bei 
allen MLI-Fehlermeldungen, die nicht 
durch spezielle Meldungen abgedeckt 
werden. Die Bedeutung der Fehlernum- 
mer xx kann in jedem ProDOS-Buch nach- 
gesehen werden (z.B. U. Stiehl: ProDOS 
für Aufsteiger, Bd. t). 
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3. Der Editor 


Der Editor ähnelt dem Big-Mac-Editor, 
einige Befehle wurden jedoch weggelas- 
sen, andere hinzugefügt oder erweitert. 
Alle Kommandos können in Groß- oder 
Kleinbuchstaben eingegeben werden. Die 
Befehlseingaberoutine funktioniert wie bei 
der Routine im Hauptmenü, siehe 2.1. 


Befehls- und Syntaxtabelle 


3.1. Befehls- und Syntaxtabelle 


Kleingeschriebene Befehlswortteile kön- 
nen weggelassen werden, ebenso spitz 
eingeklammerte Syntaxteile. Es bedeuten: 
„flename“: Pfadname eines Source-Files 
„str“: Durch beliebige Zeichen begrenzter 
String (im Gegensatz zum Big Mac wahl- 
weise mit Apostrophen oder Gänsefüß- 


Syntax mit Beispiel{(en) 


Add <filename> 
ADD /VOL/FILE 


Change loc stri str2 
C 18-28 .A.B. 


COPY zeile <-zeile> TO zeile 
COPY 18-28 TO 58 


Delete loc 
D 1,2,49- 


Edit loc <str> 
E .EQU: 
E 19-29 


Find loc <str> 
F 50- „ORG, 


Insert zeile <filenane> 
I 14 
I 14 /VOL/FILE 


List loc 
L 18-28 


MONitor 
MON 


MOVE zeile <-zeile> TO zeile 
MOVE 19-29 TO 58 


NEW 
NEW 


PRinterorFf 
PROF 


FRinterON 
PRON 


Frint loc 
P 18-28 


REName filename 
REN /VOL/TEST 


Replace loc <filename> 
R 16-28 /VOL/FILE 


Tabs t1,t2,t3 
T 18,28,38 


TERMinal num 
TERM 3 


TRuncöFf 
TROF 


TRuncöN 
TRON 


USeR 
USR 


Where zeile 
Ww 19 


Funktion 


Anhängen von Text oder File an den 
Text im Speicher. 


Ersetzt "Strl" durch "Str2", Bei "Some" muß 
jeweils mit "Y" oder "N" geantwortet werden. 


Textblock kopieren, 
Zeilen löschen, 


Zeilen, in denen "str" vorkommt, editieren. 


Zeilen, in denen "str" vorkommt, ausgeben. 


Text oder File vor "zeile” einfügen. 


Zeilen auflisten 


In den Monitor springen (Rückkehr in den 
Editor mit Ctrl-Y). 


Textblock verschieben, 

speichertext löschen. 

Drucker ausschalten. 

Drucker einschalten. 

Zeilen ohne Zeilennummer auflisten, 


Work-File umbenennen. 


Vom 


Zeilen löschen, dann Text oder File einfügen, 


Tab-Werte für den Editor neu setzen 
{T 1,1,1 löscht die Tabs] 


Terminal "num" einschalten: 

num = ®: Apple II+ 48 Zeichen 

num = 1: Videx-8ß-Zeichenkarte 

num = 2: Apple IIe/c 48 Zeichen 

nun = 3: Apple IIe/c 89 Zeichen 

Bitte die Terminals nur einschalten, wenn sie 
verfügbar sind. 


I 
= 


Kommentare sollen mit aufgelistet werden. 
Kommentare sollen abgeschnitten werden. 
Springt nach $3F5, dort kann eine eigene 


Kommando-Routine installiert werden. 


Gibt die Speicheradresse von "zeile" aus. 


chen begrenzt!) 

„zeile“: Zeilennummer (dezimal) 

„num“: Zahlenangabe (dezimal) 

„loc“: Zeilen, auf die sich das Kommando 
bezieht 


Beispiel für „loc“: 

List (ganzen Text listen) 

List 10 (nur Zeile 10 listen) 

List 10,20 (Zeilen 10 und 20 listen)) 

List -10 (Von Anfang bis Zeile 10) 

List 10- (Von Zeile 10 bis Ende) 

List 10-20 (Zeilen 10 bis 20) 

List -10,20,30,40-50,70- (entsprechend) 


Befehlstabelle 


Ein eingeschalteter Drucker wird bei fol- 
genden Kommandos aktiv: 


Change, Find, List, Print, Where. 

Die Ausgabe kann im Editor mit der Leer- 
taste zeilenweise unterbrochen und mit 
Ctrl-C ganz abgebrochen werden. 

Der Editor wird mit „Esc" verlassen. 


3.2. Zeileneditor 


Bei den Kommandos Add, Insert, Replace 
und Edit kommt der Benutzer in Berüh- 
rung mit dem Zeileneditor. Er besitzt die in 
der Tabelle gelisteten Control-Funktionen. 


3.3. Fehlermeldungen im Editor 


Neben den im Hauptmenü verwendeten 
Fehlermeldungen existieren noch speziel- 
le Editor-Fehlermeldungen: 


„Syntax error“ erscheint, wenn der einge- 
gebene Befehl nicht existiert oder nicht die 
erforderlichen Parameter mitgeliefert 
wurden. 

„Overflow error“ zeigt, daß bei Zeilen- 
nummern oder Zahlenkonstanten ein Wert 
über 65519 eingegeben wurde. 

„Range error“ meldet, daß Parameter au- 
Berhalb des zulässigen Rahmens liegen, 
z.B. nicht existente Zeilennummern. 
„Memory full“ erscheint, wenn durch 
Texteingabe oder andere speicherplatz- 
mindernde Kommandos der Textpuffer 
vollständig gefüllt wurde. 


Zeileneditor 


Tasten) 


A. Der Assembler 
4.1. Allgemeines 


Der Assembler kennt alle Opcodes des 
6502 sowie die beiden künstlichen Op- 
codes BLT und BGE als Ersatz für BCC 
und BCS. Beim Einschalten der 65C02- 
Option „lernt“ der Assembler noch die 
neuen Opcodes des 65C02, die im Peeker 
1/84, Seite 6ff. beschrieben wurden. Ins- 
gesamt beherrscht Dossembler damit 15 
verschiedene Adressierungsarten. 

Zu beachten ist, daß kein Label „A“ defi- 
niert werden sollte, da es mit der Akkumu- 
lator-Adressierung verwechselt werden 
kann. Ein akku-adressierter Befehl kann 
entweder als „ASL A“ oder einfach als 
„ASL“ geschrieben werden, beides ist 
Korrekt. 

Eine Zeile darf höchstens 255 Zeichen 
lang sein. Zwischen Spalten muß minde- 
stens ein Leerfeld oder Otrl-! stehen. Der 
Source-Code darf in Groß- oder Klein- 
buchstaben geschrieben werden. 


4.2. Pseudo-Opcodes 


Spitz eingeklammerte Syntaxteile sind op- 
tional. 
Es bedeuten: 


„expr“: arithmetischer Ausdruck (s. 
4,3.1@) 
„e.expr“: erweiterter ariihmetischer Aus- 


druck (s. 4.3.2.) 

„str“: durch”Sonderzeichen begrenzter 
String 

„file“: Pfadname 

„status“: ON oder OFF 

„label“: Label 

Näheres kann der gesonderten Tabelle 
entnommen werden. 


Die Opcodes DSECT und DEND wurden 
vom Apple-Editor/-Assembler übernom- 
men. Für die Verwendung ein Beispiel: 


DSECT 
ORG $58 
ADRL DS 2 
ADRH  EQU ADRL+1 
TEMPß® DS 1 
TEMPl DS 5 
DEND 


Funktion 


a 


Ctrl-B 

Ctrl-D 

CGtrl-E 

Gtrl-F chr 
Ctrl-H oder <- 
Ctrl-I oder TAB 


Springt an Zeilenanfang 

Löscht Zeichen unter Cursor 

Springt an Zeilenende 

Setzt Cursor auf nächstes "chr" (1 Zeichen) 
Setzt Cursor ein Zeichen nach links 

Schaltet Einfügemodus ein (Ausschalten durch 


ein beliebiges Ctrl-Zeichen) 


Ctrl-M oder RETURN 


Übernimmt die gesamte Zeile 


Ctrl-R Stellt ursprüngliche Zeile wieder her 
{nur bei EDIT) 

CGtrl-T Schneidet Zeile ab Cursorposition ab 
Ctrl-U oder -> Setzt Cursor ein Zeichen nach rechts 
Ctrl1—X Bricht Editieren ab 
Ctrl-P oder DEL Löscht das Zeichen links vom Cursor 
ESC Schaltet Tabulierung ab der dritten Spalte 

5 ein/aus 


RR 


Es ist möglich, beispielsweise Labels onne 
feste Adressenzuordnung zu definieren. 
Muß das Datensegment später verscho- 
ben werden, kann in der ORG-Zeile eine 
neue Adresse angegeben werden. Aller- 
dings muß nicht jedes Label umdefiniert 
werden. Ähnliche Anwendungen sind ent- 
sprechend denkbar. 


4.3. Arithmetische Ausdrücke 


4.3.1. Einfache arithmetische 
Ausdrücke 

Der Assembler verarbeitet arithmetische 
Ausdrücke mit den 5 Operatoren + (Addi- 
tion), - (Subtraktion), x (Multiplikation), / 
(ganzzahlige Division) und & (bitweises 
logisches UND). Die Operanden können 
Konstanten (dezimal: ohne Markierung, 
hexadezimal:; mit führendem „$“, dual: mit 
führendem „%"), Labels (x gilt als PC) 
oder Textzeichen sein. 

Ein rechnerischer Überlauf wird nicht er- 
kannt. Ausdrücke werden von links nach 
rechts durchgerechnet, Klammern sind 
nicht erlaubt. 


Beispiele: 


ORG 19 
ORG $1B 
ORG %1® 


ORG ADR 
ORG ADR+$19 
ORG ADR+$1d-%181® 


ORG 'A 

ORG 'A'+ADR 

ORG ADR+19-TMP/%1810+$10rH'A' 
usw, 


4.3.2. Erweiterte aritnmetische 
Ausdrücke 

Erweiterte aritnmetische Ausdrücke geben 
dem Benutzer die Möglichkeit, den Aus- 
druck zu verfeinern: Ein vorgestelltes „<” 
zeigt an, daß nur das Low-Byte des Aus- 
drucks gewertet werden soll. Entspre- 
chend gilt „>“ und „/“ für das High-Byte. 
Ein „#“ kann jederzeit vorangestellt 
werden. 


Beispiele: 


DFB <LÄABEL 
DFB =>LABEL+4A 
DFB #/LABEL 


DFB #-1® 
DFB #+1ß8-LABEL 
DFB $19-28+%181 


USW 


4.4. Assembler-Fehlermeldungen 


„Ilegal line format: 

Eine Zeile ist länger als 255 Zeichen (oder 
endet nicht auf $OD). 

„illegal file type: 

Der Source-File ist nicht vom Typ „TXT”. 
„MLI Error #Sxx": 

Der ProDOS-MLI-Fehler Nr. xx trat auf. 
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„include file stack overflow: 

Es wurde versucht, mehr als vier include- 
Files ineinander zu verschachteln. 

„Bad label“: 

Ein Label enthält illegale Zeichen, z.B. + - 
* / 

„Symbol table full“: 

Die Symboltabelle ist voll, die Grenzen 
des Assemblers überschritten. 

„Bad expression": 

Ein arithmetischer Ausdruck ist fehlerhaft 
aufgebaut. 

„No such label“: 

Ein undefiniertes Label wurde verwendet, 

„Duplicate symbol: 

Es wurde versucht, ein Label zweimal zu 
definieren. 

„Bad DSECT/DEND*: 

Es wurde versucht, DSECT/DEND-Kon- 
struktionen zu schachteln. 

„Bad opcode“: 

Ein nicht existierender Opcode wurde ver- 
wendet. 

„Bad address mode": 

Eine zwar existierende, aber für diesen 
Opcode nicht zugelassene Adressie- 
rungsart wurde verwendet. 

„Bad operand“: 

Eine nicht existierende Adressierungsart 
wurde verwendet. 

„Bad branch": 

Die Distanz für einen relativen Sprung war 
zu groß. 


4.5. Abbruch 


Die Assemblierung kann durch die Leerta- 
ste zeilenweise angehalten und durch 
Gtrl-C ganz abgebrochen werden. 

Jeder MLI-Fehler führt zum Abbruch. 


5. Sonstiges 
5.1. RESET 


Das Drücken von RESET bewirkt, daß das 
Programm (normalerweise ohne 
Datenverlust) verschiedene Initialisierun- 
gen vornimmt und danach nach seiner 
Startdiskette sucht. Diese muß unbedingt 
vorhanden sein. 

RESET sollte nicht während eines Disket- 
tenzugriffs oder während der Abarbeitung 
von Editor-Kommandos benutzt werden. 


5.2. Hardware-Konfiguration 


Das Programm setzt einen Apple II ab 
Version II+ voraus, auf dem ProDOS lauf- 
fähig ist. Eine 80-Zeichenkarte wird nicht 
benötigt, kann aber benutzt werden (Apple 
oder Videx). Ein Drucker wird ebenfalls 
nicht benötigt, ist aber voll in das Pro- 
gramm integriert. Eine Uhr wird nicht be- 
nötigt, aber erkannt und benutzt. Jeder 
ProDOS-kompatible Massenspeicher ist 
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9.9.49 ASSEMbDLER 9.4 


Pseudo-Opcodes 


Syntax/Beispiel 


label EQU e,expr 
ABC EQU *-5 
INCLUDE file 
INCLUDE /VOL/FILE 
ASM file 

ASM /VOL/FILE 
ASC str 

ASC 'Peeker' 

DCI str 

DEI 'Dossembler' 
STR str 

STR 'Apple' 

LST status 

LST OFF 

MSB status 

MSB ON 

DO e,expr 

DO TEST 

FIN 

FIN 

ELSE 

ELSE 

END 

END 


HEX hl <,h2,h3,...> 


wie ASC, 


Funktion 

Definition eines Labels 

Include-File einbinden 

"fjle" assemblieren {neuer ASM-Start) 
String zeichenweise einbinden 


wie ASC, beim letzten Zeichen Bit 7 invers 


jedoch mit führendem Längenbyte 


Assembler-Listing ein/ausschalten 

Bit 7 setzen/löschen {bei Strings} 

Folgendes nur assemblieren, wenn "e.expr" = 1 
Ende des konditionalen Assemblierens 

Letzte DO-Bedingung negieren 

Assemblierung hier abbrechen 


Hex-Zahlen einbinden 


HEX ®1,%2,93 {Komma kann auch weggelassen werden) 
ORG expr PC auf "expr" setzen, neuer OBJ-File 
ORG 42909 ’ 

PHS expr PC auf "expr" setzen 

PHS $3889 

OBJ expr bei Dossembler bedeutungslos 

OBJ $4BB8 

DSECT Beginn einer "dummy section", S. 4.2 
DSECT 

»DEND Ende einer "dummy section", S. 4.2. 
:DEND 

DS expr Leerraum definieren 

DS $39 

DFB e.expr <,e.expr,.,,.> Einzelne Datenbytes einbinden 

DFB 18,$29,'B'!,5-3 

DW e,expr <,e,expr,,..,> Doppelbytes einbinden (low byte first) 
DW TEMP,$1234 

DA e,expr <,e,.eXpT,,.,.> 1 1 4 

DA TEMP, $1234 

DDB e.expr <,e.expr,,,.> " ı (high byte first) 


DDB TEMP,$1234 
PREFIX file 
PREFIX /DISK 
TR status 

TR ON 

PAGE 

PAGE 

SKP e.expr 

SRP » 

SYS 

SYS 

REL en 
REL 

BIN y 
BIN 

CHR str 
CHR '-—' 
RPT e.expr 
RPT 49 
6592 

6582 

65092 
65C92 


verwendbar. Ein Kleinschreib-Umrüstsatz 
(II+) wird erkannt. 

Eine 80-Zeichenkarte wird in Slot 3 erwar- 
tet, die Videx-Karte kann aber nach einer 
Installation auch in einem anderen Slot 
untergebracht werden, ebenso wie das 
Drucker-Interface, das in Slot I erwartet 
wird. Die Slot-Werte sind in der Global 
Page eingetragen. 


Setzt ProDOS-Präfix auf "file" 
OBJ-Abschneiden ein aus 

(z.B. bei langen Strings) 

gibt FF ($8C) auf Drucker aus 
gibt "e.expr"-mal CR ($PD}) aus 


definiert nächste OBJ-Files als Typ "SYS" 


"REEL" 


u IT [1 14) 


"BIN" 


(Standardeinstellung) 

Speichert erstes Zeichen von "str" als 
Trennzeichen 

gibt das Trennzeichen "e,.expr"-mal aus 


schaltet auf 65ß2-Opcodes 


schaltet auf 65C92-Opcodes 


5.3. Global Page 


Alle Programmkonstanten und Konfigura- 
tionsdaten sind in der Dossembler Global 
Page „ASM.GP“ gespeichert und können 
dort verändert werden. Die Beschreibung 
der Global Page würde den Rahmen die- 
ses Artikels sprengen. 


6. Übungsbeispiel 


1. Wir starten den Assembler mit 
-ASM.SYSTEM 


2. Wenn das Datum-Menü erscheint, tip- 
pen wir „n“ oder „N“, falls wir das alte 
Datum nicht ändern wollen. 


3. Nun gelangen wir in das eigentliche 
Haupt-Menü. Hier tippen wir „e* oder „E" 
für „Editieren“. Da noch kein Dateiname 
(Work-File) spezifiziert wurde, springt der 
Cursor automatisch in die entsprechende 
Spalte. Hier geben wir „TEST” ein. Da- 
nach gelangen wir in den leeren Ecditier- 
bildschirm. 


4. Wir tippen nun „a“ oder „A“ für „Add 
und geben dann das folgende Beispiel ein: 


ORG H198B 
COUT EQU $FDED 
MSB ON ; für String 
LDX #d 
LOOP LDA STRING,X 
BEQ ENDE 

JSR CGOUT 

INX 

BNE LOOP 
ENDE RTS 
STRING ASC 'HALLO' 
HEX &Ddd 


Das obige Beispiel zeigt genau das an, 
was Sie tippen müssen. Am Bildschirm 
sehen Sie jedoch, daß automatisch Zeilen- 
nummern vergeben werden und im übri- 
gen mit jeder Leertaste automatisch in das 
nächste Feld tabuliert wird. Am Schluß 
nach Eingabe der Zeile „ HEX 8D00” tip- 
pen Sie einfach ein nacktes Return. Damit 
verlassen Sie den Editor. 


5, Mit „I“ oder „L“ für „List“ wird der 
soeben eingegebene Quelltext am Bild- 
schirm gelistet. Nun tippen Sie auf die 
ESC-Taste und gelangen damit wieder in 
das Haupt-Menü. Hier geben Sie „s” oder 
„Ss“ für „Save“ ein, womit der Quelltext 
automatisch unter dem früher angegebe- 
nen Namen „TEST“ auf Diskette gespei- 
chert wird. 


6. Nun tippen wir auf „a“ oder „A“ für 
„Assemble“, worauf der Cursor in die Ob- 
jektcode-Spalte springt und „TEST.OB- 
JO“ ausweist. Es genügt, wenn Sie jetzt 
einfach auf die Return-Taste drücken. Da- 
nach erfolgt die Assemblierung, die Sie 
am Bildschirm verfolgen können. 


7. Wir verlassen nun den DOSSEMBLER 
über „q“ oder „Q“ für „Quit“ und geben 
danach als SYS-Datei „BASIC.SYSTEM" 
ein. Vom BASIC.SYSTEM aus können wir 
dann später mit 

-IESBOSHES 

unser Übungsprogramm starten, das 
„HELLO“ am Bildschirm ausgibt. 


10 


Speicherverteilung 


ROM 


Monitor 


Applesoft-BASIC- 
Interpreter 


CXXX-ROM und Slots 





FFFF 


F800 


D000 


C000 


BFOO 


BBOO 





64K-RAM der Grundplatine 
EDITOR ASSEMBLER 


ProDOS 


CXXX-ROM und Slots 


ProDOS System Global Page 


Workfile-Puffer 


Puffer für Source Files 


Textspeicher 


Puffer für Listing-File 


ASSEMBLER 
| EDITOR 


nicht benutzt 


- OBJ-Filepuffer 


Textbildschirm 
DOSSEMBLER Global Page / Vektoren 
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Teil 1 


von Arne Schäpers 


Dieser Kurs, der aus einer allgemeinen Be- 
schreibung des Prozessors mit einigen IlIgs- 
spezifischen Anwendungsbeispielen besteht, 
muß wegen des großen Umfangs auf zwei 
Peeker-Hefte verteilt werden. Der Kurs stellt 
(wie die bereits zur 6502-, Z80- und 68000- 
Programmierung erschienenen Kurse) keine 
komplette Einführung in die Programmierung 
dar. Vom Leser wird erwartet, daß er mit minde- 
stens einem anderen Prozessor gewisse Erfah- 
rungen gesammelt hat und mit grundlegenden 
Konzepten wie Registern, Speicheradressen 
und sequentieller Abarbeitung eines Program- 
mes vertraut ist. 

Heft 7/85 des Peeker enthält eine wesentlich 
breiter angelegte Einführung zur Arbeitsweise 
des 6502-Prozessors, auf der wir hier teilweise 
aufbauen, 


1. Vom 6502 zum 658xx 


Um es gleich vorwegzunehmen: Die Prozesso- 
ren der Reihe 655C8xx sind die Erfüllung der 
Träume eines 6502-Programmierers - sie stel- 
len in (fast) jeder Hinsicht eine konsequente 
Erweiterung dar. 

Beginnen wir mit den gemeinsamen Charakteri- 
stika der 65er-Familie, bevor wir die speziellen 
Eigenschaften der einzelnen Mitglieder erör- 
tern: 


@ Speicherorientierung: Alle Prozessoren der 
Reihe 65xx verfügen über einen sehr kleinen 
Satz an Registern. Mehr oder weniger als „Aus- 
gleich“ wird ein spezieller Speicherbereich (die 
„Seite 0") benutzt, dessen Speicherstellen die 
Funktion von Indexregistern übernehmen kön- 
nen. Der Streit der Experten, welches Konzept 
das bessere sei — viele Register oder ein spe- 
zieller Speicherbereich, über den zusätzliche 
Adressierungsarten möglich sind — dauert noch 
an. Das eine Extrem dürfte der TMS 9916 dar- 
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65816/65802- 
Kompaktkurs für 
Apple Ilgs 


stellen, der praktisch ohne eigene Register aus- 
kommt und nur mit Speicherstellen arbeitet, das 
andere die 32xx-Reihe von National Semicon- 
ductor, bei der der Programmierer mit Registern 
und dazugehörigen Adressierungsarten förm- 
lich erschlagen wird. 

© Vergleichsweise niedrige Taktfrequenz: Alle 
Prozessoren der 65er-Familie verwenden einen 
zweiphasigen Takt, bei dem in jeder der beiden 
Phasen Operationen ausgeführt werden — im 
Gegensatz zu den meisten anderen Prozesso- 
ren, die den Systemtakt intern erst ein paarmal 
herunterteilen. So kommt es, daß der Befehls- 
durchsatz eines 65816 bei 4 MHz über dem 
eines mit 8 MHz betriebenen 68000 liegt. Ein 
Register-zu-Register-Transfer benötigt beim 
68000 4 Taktzyklen, beim 65816 sind es nur 2; 
Schiebeoperationen des Akkus werden beim 
65816 in 2 Taktzyklen ausgeführt, der 68000 
braucht 6 Zyklen dazu. Daß der 68000 dennoch 
ein ganzes Stück leistungsfähiger als der 65816 
ist, liegt an der Unzahl der verfügbaren Befehle 
und der internen 16/32-Bit-Architektur. 

Ein Vergleich zwischen dem 65816 und dem 
Z80 ist beinahe unfair (obwohl der Z80 auch 
über eine Reihe von 16-Bit-Befehlen verfügt) - 
hier müßte man mit einer Taktfrequenz von ca. 
15 MHz arbeiten, um auf dieselbe Rechenlei- 
stung zu kommen, 

@ Kleiner Befehlssatz: Der 6502 kennt lediglich 
57 verschiedene Befehle mit 13 verschiedenen 
Adressierungsarten, Seine Assemblerprogram- 
mierung ist deshalb auch für Benutzer relativ 
leicht zu erlernen, die nicht ihre gesamte Zeit 
vor einem Bildschirm verbringen wollen. Für 
den 65816 ist diese Behauptung nicht mehr 
ganz zutreffend: Die Zahl der Befehle ist auf 91 
gewachsen, die der Adressierungsarten auf 24. 
@ Starke Asymmetrie: Nur ein sehr kleiner Teil 
der Adressierungsarten und Befehle ist unein- 
geschränkt anwendbar — beispielsweise ist ein 
Befehl wie LDX $4000,Y („Lade X-Register 
mit...") definiert, STX $4000,Y („Speichere X- 











Register auf...") dagegen nicht. Die nicht defi- 
nierten Ausnahmen lassen sich aufgrund des 
kleinen Befehlssatzes relativ einfach im Kopf 
behalten - in dem Maße, in dem der Befehlssatz 
bei den neueren Mitgliedern der 65er-Familie 
gewachsen ist, wurde auch die Asymmetrie zu- 
mindest teilweise beseltigt. 

Der Hauptgrund für dieses Verhalten liegt in der 
ausschließlichen Verwendung von Befehlsco- 
des mit einem Byte Länge. Um eine voliständi- 
ge Symmetrie (Stichwort: Orthogonalität) zu er- 
reichen, hätte man Mehrbyte-Befehlscodes ver- 
wenden müssen. 

Waren beim 6502 noch rund die Hälfte aller 
möglichen Befehlscodes „reserviert“, so ist 
beim 65816 lediglich ein einziger Code „für 
Erweiterungen“ freigehalten. Wie zu hören war, 
ist ein künftiger „651632“ bereits über die An- 
fänge der Planung hinaus — er wird vollständig 
zum 65816 kompatibel sein; sämtliche neuen 
Befehle dieses „651632" werden mit diesem 
freigehaltenen Code beginnen, also zwei Byte 
umfassen. 


1.1. Der 6502 


Das „Ur-Exemplar" der 65er-Familie kam un- 
gefähr 1977 auf den Mark und wird im Apple Il 
bzw. II+ sowie dem Acorn („BBC-Computer“) 
verwendet. Der 6502 ist für 1 und 2 MHz Takt- 
freguenz erhältlich, verfügt über einen 
Datenbus mit 8 Bit Breite (d.h. liest/schreibt mit 
jeder Operation ein Byte) und einen Adreßraum 
von 64K. Vier Schlagworte kennzeichnen die- 
sen Prozessor: 

@ Reine 8-Bit-Maschine: Sämtliche Register 
außer dem Programmzähler („PC") sind 8 Bit 
breit, Es gibt weder Operationen, die mehr als 8 
Bits auf einmal behandeln, noch eine Möglich- 
keit, mehrere Register zu einem 16-Bit-Wort zu 
kombinieren (wie z.B. beim Z80). 

@ Akkumulatororientiert: Der 6502 hat nur ein 
einziges Register, in dem Rechenoperationen 
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(Addition, Subtraktion, Schiebeaktionen usw.) 
ausgeführt werden können. 

®@ Ein-Adreß-Maschine: Alle Datentransfers 
müssen über ein Register führen. Um z.B. eine 
Speichersielle auf den Wert O zu setzen, muß 
zuerst ein Register mit diesem Wert geladen 
werden, danach wird der Inhalt des Registers 
auf die entsprechende Adresse geschrieben 
(vgl. 65C02). Die einzige Ausnahme stellen Ro- 
tations- und Schiebebefehle dar, die auch ohne 
den Umweg über ein Register auf Speicherstel- 
len angewendet werden können. 

© Fixierter Stack: Der „Stapelspeicher" des 
6502 belegt grundsätzlich den Adreßbereich 
von $0100 bis $O1IFF und kann damit maximal 
256 Bytes aufnehmen. 


1.2. Der 65C02 


Der Nachfolger des 6502 ist seit 1984 erhältlich 
und im Apple Ilc sowie den neueren Ausgaben 
des Ile eingebaut, Seine Taktfrequenz beträgt 
bis 4 MHz, in den Appie-Geräten wird er mit 1 
MHz betrieben. Er unterscheidet sich vom 6502 
in mehrfacher Hinsicht: 


© Durch einen anderen Herstellungsprozeß 
(das „C" im Namen steht für „CMOS“) wird nur 
noch ein Bruchteil der elektrischen Leistung 
benötigt. Der Prozessor erwärmt sich auch bei 
mehrstündigem Betrieb nur unwesentlich — im 
Gegensatz zu seinem Vorläufer, der in Insider- 
kreisen als „Eierkocher" bespöttelt wird. 

® Das Konzept der Akkumulatororientierung 
wurde gelockert. Durch eine Reihe neuer Be- 
fehle (PHX, PLX, PHY, PLY..) sind Datentrans- 
fers zwischen den Indexregistern und dem 
Stack möglich. Beim 6502 ist diese Operation 
nur über den Akku möglich, d.h. über den Um- 
weg „Indexregister zum Akku — Akku auf den 
Stack“, 

@ Man kann den 65C02 nur noch bedingt als 
Ein-Adreß-Maschine bezeichnen. Durch neue 
Befehle (STZ = STore Zero, TSB/TRB = Test, 
Set/ Reset Bits) sind erweiterte Operationen mit 
dem Inhalt von Speicherstellen möglich, ohne 
daß dabei ein Register benötigt wird. Eine echte 
Zwei-Adreß-Operation wie „lade Speicherstelle 
X mit dem Inhalt von Speicherstelle Y" ist aller- 
dings nicht vorhanden. 


Der 65C02 ist „aufwärtskompatibel" zum 6502, 
d.h. sämtliche Programme, die für den 6502 
geschrieben wurden, laufen unverändert auch 
mit einem 65C02 (bis auf ein paar sehr exolti- 
sche Ausnahmen). Der 65002 „versteht“ sämt- 
liche Befehle des 6502 und führt sie in gleicher 
Weise aus - nur kennt er noch ein paar zusätzli- 
che Befehle, die beim 6502 nicht definiert sind. 
Weiterhin ist der 65C02 „pinkompatibel“: Man 
kann einen 6502 aus seiner Fassung heraus- 
nehmen, einen 65C02 einstecken und danach 
mit dem neuen Prozessor weiterarbeiten, als 
wäre nichts geschehen. (Für die Elektronik- 
Spezialisten unter den Lesern: Wegen leicht 
veränderter Bus-Zugriffszeiten stimmt das nicht 
immer — speziell bei sehr alten Ausgaben des 
II+ (vor Rev. 7B) sollte man dabei auf (seltene) 
Abstürze gefaßt sein [1]). 

Abgesehen von den neuen Befehlen und der 
moderneren Herstellungsverfahren ist der 
65002 gegenüber dem 6502 unverändert ge- 
blieben. Es handelt sich nach wie vor um einen 
reinen 8-Bit-Prozessor mit 64K Adreßraum, der 
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44 67816 ‚’ 


Stack ist auch hier auf den Bereich 
$0100..$01FF fixiert. Pr 


Ar 


1.3. Der 655C816 


Dieser Prozessor wird im folgenden meist nur 
als „65816“ bezeichnet und ist die 8/16-Bit- 
Version des 65C02. Er ist seit Mitte 1986 auf 
dem Markt und wird im Apple Iigs sowie im 
Nachfolgemodell des Acorn von BBC verwen- 
det. Seine derzeitige Taktfrequenz beträgt bis 4 
MHz, Erhöhungen auf 6 und 8 MHz sind ge- 
plant. Im Apple Ilgs wird er mit 2,8 MHz betrie- 
ben. Der 65816 ist aufwärtskompatibel zum 
65C02 und läßt sich per Programm zwischen 
zwei Betriebsarten (8 und 16 Bits) umschalten. 
Er verfügt nach wie vor über einen Datenbus mit 
8 Bits — der Adreßbus umfaßt aber 24 Bits 
(Adreßraum: 16M), die internen Register sind 
16 Bit breit, Hauptsächlich wegen des erweiter- 
ten Adreßbusses ist der 65816 nicht pinkompa- 
tibel zum 65(C)02, 

Im 8-Bit-Modus („Emulation Mode") verhält er 
sich wie ein 65C02, d.h. sämtliche Register sind 
8 Bit breit, der Stack ist auf den Bereich 
$0100..$01FF fixiert, der verfügbare Adreßraum 
beträgt 64K (genauere Informationen s. 4.1.2). 
Im 16-Bit-Modus („Native Mode") gibt es eine 
ganze Reihe von Erweiterungen: 

® Der Akkumulator („A“) und die Indexregister 
(„X", „Y“) sind unabhängig voneinander zwi- 
schen 8 und 16 Bit Breite umschaltbar. 

® Dem Programmzähler („PC“) wird ein Pro- 
grammbank-Register („PB“) mit acht Bit Breite 
vorangestellt, der Prozessor gibt damit jeweils 
eine 24-Bit-Adresse zum Lesen von Befehlen 
aus. 

® Der Adressierung von Daten wird ein 
Datenbank-Register („DB“) mit acht Bit Breite 
vorangestellt, der Prozessor gibt damit jeweils 
eine 24-Bit-Adresse zum Lesen und Schreiben 
von Daten aus. Das Datenbank-Register ist un- 
abhängig vom Programmbank-Register. 

@ Sämtliche Adressierungen der Seite O („Ze- 
ropage“) werden über ein Direct-Register („D") 
ausgeführt. Dieses Register hat eine Breite von 
16 Bits und kann beliebig verändert werden. 
Damit sind bis zu 256 verschiedene „Zero- 
pages" möglich. Das D-Register arbeitet unab- 
hängig von der Programm- und Datenbank. 

© Der Stackpointer („SP“) hat eine Breite von 
16 Bits, der Stack ist somit nicht mehr auf den 
Bereich $0100..$01FF fixiert und kann maximal 
64K aufnehmen; 


© Der Prozessor verfügt über zahlreiche neue 
Befehle zur Manipulation der Register PB, DB 
und D sowie über eine Reihe neuer Adressie- 
rungsarten, die ihn fast ideal für die Implemen- 
tation von Hochsprachen machen (s. Abschnitt 
6). 


1.4. Der 655C802 


Die „8-Bit-Version" des GTE-65SC816 ist vor- 
aussichtlich ab Ende dieses Jahres erhältlich 
(bei anderen Produzenten bereits früher). Die- 
ser Prozessor ist softwarekompatibel zum 
6550816 und pinkompatibel zum 65(C)02. Er 
enthält denselben Registersatz wie der 
655C816, kennt dieselben Befehle und läßt 
sich genauso zwischen „Emulation Mode“ und 
„Native Mode“ umschalten. Der einzige Unter- 


schied besteht darin, daß die Inhalte der Regi- 
ster PB und DB keine (elektronische) Wirkung 


“ haben — die entsprechenden AdreßBleitungen 


sind nicht aus dem Chip herausgeführt. Obwohl 
der Prozessor intern mit 24-Bit-Adressen arbei- 
tet, beträgt der effektive AdreßBraum damit 64K. 
Ein Prototyp des 6550802, den mir Herr Earwa- 
ker von der Firma GTE (dem Hersteller der 
655C8xx-Reihe) freundlicherweise überlassen 
hat, befindet sich seit nunmehr zwei Monaten in 
einem lie - im „Emulation Mode“ laufen selbst 
extrem zeitkritische Programme wie SUPER- 
QUICK völlig störungsfrei. 

Wer Interesse an Experimenten mit den neuen 
Befehlen der 655C8xx-Prozessoren hat und 
sich nicht gleich einen Apple Ilgs zulegen will, 
sollte sich den 655C802 und dazu einen der 
folgenden Assembler besorgen: 


ProDOS ORCA/M, Version 4.0 von Byte Works 
— sehr komplex, arbeitet mit einzelnen Modulen, 
lokalen Labels und einer Makrobibliothek, Ist 
entsprechend langsam und für sehr große Pro- 
jekte die einzige Wahl; 

Merlin Pro von Roger Wagner - für Projekte 
mittlerer Größe, recht schnell, unterscheidet 
sich in Bedienung und Verhalten kaum von den 
bisher erschienenen Merlin-Versionen; 
SC-Assembler (ProDOS-Version) von S-C 
Software Corporation — zum Experimentieren 
das ideale Programm; vollständig RAM-resident 
und deshalb extrem schnell, der erzeugte Ob- 
jektcode kann vom Editor aus aufgerufen wer- 
den. Für mittlere und größere Programmprojek- 
te allerdings nur bedingt geeignet. 


2. Aufteilung des Adreßraumes 


Bild 1 zeigt die Aufteilung des Speichers aus 
der Sicht des 65816-Programmierers, wobei ei- 
ne „Erblast“ deutlich zu erkennen sein sollte: 
Bedingt durch die Forderung nach Software- 
Kompatibilität zum 65(C)02 besteht der adres- 
sierbare Speicher nicht aus einer durchgehen- 
den („linearen“) Folge von Adressen, er ist statt 
dessen in 256 Bänke mit jeweils 64K aufgeteilt. 
Jede Bank besteht ihrerseits aus 256 Seiten 
(„Pages“) mit jeweils 256 Bytes. 





Bild 1: Aufteillung des Adreßraumes 


Ohne allzusehr auf die folgenden Abschnitte 
vorgreifen zu wollen: Eine lineare Adressierung 
würde grundsätzlich drei Bytes als Operanden 
benötigen -— um z.B. den Akku mit dem Inhalt 
der Speicherstelle $17A412 zu laden, wäre ein 
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Befehl erforderlich, der vier Byte Programm- 
speicherplatz belegt: 


LDA $17A4Al2 ; 3-Byte-Adresse 

Diese Adressierungsart („absolut lang“) kennt 
der 65816 auch - im Normalfall werden aber nur 
zwei anstelle von drei Bytes für eine Adreßan- 
gabe benötigt. Beispiel: Wenn das Register DB 
den Inhalt $17 hat, dann führt der Befehl 


LDA $A412 ı 2-Byte-Adresse 

zum selben Ergebnis, wobei zusätzlich noch 
einige Taktzyklen eingespart werden. Das Pro- 
gramm ist also nicht nur kürzer, sondern auch 
schneller. 

Für Maschinenprogrammierer dürfte diese Un- 
terteilung des Speichers in den seltensten Fäl- 
len ein Problem darstellen - für Hochsprachen- 
Compiler sieht das schon etwas anders aus. 
Man darf gespannt sein, ob die demnächst für 
den Apple Ilgs erscheinenden Programmier- 
sprachen Pascal und C die Größe eines Pro- 
gramms auf 64K begrenzen (wie es z.B. beim 
Turbo-Pascal für den IBM PC der Fall ist). 

Wir werden uns im weiteren für „lange“ Adres- 
sen an die Schreibweise halten, die von Apple, 
Inc. in den Handbüchern zum IIgs benutzt wird. 
Die Bank-Adresse (ein Byte) ist durch einen 
Schrägstrich von der Adresse innerhalb der 
Bank (zwei Byte) getrennt. Die folgenden Nota- 
tionsformen bezeichnen also dieselbe Adresse: 


; Bank $17, Adr. $A412 
ı Adresse $17A4l2 


$17/A412 
$17A412 


2.1. 16-Bit-Operanden 


Da der 65816 nur über einen Datenbus mit 8 Bit 
Breite verfügt, führt das Laden eines 16 Bit 
breiten Registers zu zwei aufeinanderfolgenden 
Speicherzugriffen. Ein Befehl wie „LDA $A412" 


x) Die Inhalte der Register PB und DB bleiben beim 65802 ohne Wirkung auf die effektiv erzeugte 


Adresse, 
Bild 2: Register des 65816 
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liest also die Speicherstellen $17/A412 und 
$17/A413 hintereinander, wenn der Akku auf 16 
Bit Breite gesetzt ist. 

Der Zeitbedarf einer solchen Operation liegt 
erheblich über dem eines „echten“ 16-Bit-Pro- 
zessors, der beide Bytes gleichzeitig liest bzw. 
schreibt. Abgesehen von den niedrigeren Ko- 
sten im Vergleich zu einem vollwertigen 16-Bit- 
System gibt es noch einen kleinen Vorteil anzu- 
merken: Probleme mit dem „alignment” von 
Adressen wie beim 8086 oder dem 68000 gibt 
es nicht. Bei diesen Prozessoren ergibt sich ein 
unterschiedlicher Zeitbedarf bzw. ein Fehler, 
wenn der niederwertige Teil eines 16- bzw. 32- 
Bit-Operanden nicht auf einer Speicherstelle 
mit geradzahliger Adresse liegt. 

(Eine Kuriosität am Rande: Das Ansprechen 
mehrwertig dekodierter „Toggles" in der Elek- 
tronik des Computers ist im 16-Bit-Modus prak- 
tisch unmöglich. Das beste Beispiel dafür ist der 
Lautsprecher des Apple, dessen Polarität bei 
einem Zugrff auf den Adreßbereich 
$0030..$C03F umgeschaltet wird. Ein Befehl 
wie „LDA $C030“ adressiert im 16-Bit-Modus 
zuerst die Speicherstelle $C030, danach die 
Speicherstelle $C031 — der Lautsprecher wird 
also im Verlauf von zwei Mikrosekunden zwei- 
mal umgeschaltet und gibt folglicherweise über- 
haupt keinen Ton von sich.) 


2.2. Reihenfolge der Speicherung 


Alle Daten, die mehr als ein Byte Speicherplatz 
belegen, werden vom Prozessor grundsätzlich 
so gespeichert, daß das niedrigstwertige Byte 
auf der niedrigsten Speicheradresse steht. Bei- 
spiele: 


xxxx— AD BB AA LDA $AABB 


Dieser Befehl lädt den Akku mit dem Inhalt der 
Speicherstelle (DB)/$AABB. Der Opcode des 
Befehls ($AD) steht auf der Adresse xxxx, der 
niederwertige Teil der Adresse ($BB) auf der 
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Adresse xxxx+1, der höherwertige ($AA) auf 
der Adresse xxxx+2. Analoges gilt für 16-Bit- 
Operationen wie z.B. das Laden des Akkumula- 
tors mit einem festen Wert („immediate"): 


xxxx—- A9 20 17 LDA +#$1728 


Hier wird der Akku mit dem Wert $1720 gela- 
den, wobei der niederwertige Teil ($20) auf der 
Adresse xxxx+1, der höherwertige Teil ($17) 
auf der Adresse xxxx+2 steht. Diese’ Art der 
Speicherung (Low-Byte first) findet sich bereits 
beim 65(C)02. Neu hinzugekommen ist beim 
65816 die Behandlung von „langen“ Adressen: 


xxxx— AF BB AA 20 LDA $2BAABB 


Dieser Befehl lädt den Akku mit dem Inhalt der 
Speicherstelle $20/AABB, die Adresse ist 
ebenfalls im „umgekehrter“ Reihenfolge ge- 
speichert. 

Das Konzept der umgekehrten Speicherung 
von Adressen wird für alle Speicheroperationen 
konsequent benutzt - es gilt für Variablen, Fest- 
werte, Pointer und „lange“ Adressen sowie für 
die Reihenfolge der Speicherung auf dem 
Stack. (Eine Returnadresse wird so gespei- 
chert, daß ihr niederwertiger Teil auf der niedri- 
geren Adresse zu stehen kommt.) 


3. Die Register des 65816 


Bild 2 zeigt den vollständigen Registersatz des 
65816. Bereits beim 65(C)02 vorhandene Regi- 
ster bzw. Flaggenbits sind schraffiert darge- 
stellt. Alles, was hier und Im folgenden über den 
65816 gesagt wird, gilt auch für den 65802 - 
Ausnahmen sind jeweils explizit als solche ge- 
kennzeichnet. 


3.1. Programmbank-Register (PB) 
und Programmzähler (PC) 


Der 65816 bildet die (24-Bit-)Adresse des 
nächsten zu lesenden Befehls aus dem mo- 
mentanen Stand des Programmzählers (untere 
16 Bits) und des Programmbank-Registers 
(obere 8 Bits). 

Beispiel: Ist PB = $20 und PC = $140A, wird 
der nächste Befehl von der Adresse $20/140A 
gelesen. Der PC wird für jedes gelesene Byte 
um eins erhöht, ein „Überlauf“ in PB findet 
nicht statt, wenn der PC über $FFFF hinaus 
erhöht wird. Der folgende Befehl wird nie aus- 
geführt, wenn er sich auf der gezeigten Adresse 
befindet: 


$2ß/FFFE- AD BB AA LDA $AABB 


Hier liest der Prozessor den Opcode für „LDA 
absolut“ von der Speicherstelle $20/FFFE, den 
ersten Teil der Adresse ($BB) von der Spei- 
cherstelle $20/FFFF und das nächste Byte von 
$20/0000. 

Sprünge („JMP") und Aufrufe von Unterpro- 
grammen („JSR“") finden grundsätzlich inner- 
halb der Bank statt, auf die das Programmbank- 
Register zeigt. Das Überschreiten einer Pro- 
grammbank durch relative Sprünge ist ebenfalls 
nicht möglich. 

Es gibt nur zwei Möglichkeiten, den Inhalt von 
PB zu verändern, wenn man einmal von Inter- 
rupts (s. Abschnitt 5) absieht: 
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® Den Befehl JML („JMP long“). Der Operand 
(d.h. das Sprungziel) hat hier eine Länge von 
drei Bytes. Mit dem Inhalt des höchstwertigen 
Bytes wird PB neu gesetzt, der alte Inhalt von 
PB geht dabei verloren. Beispiel: Wenn PB = 
$20 und PC = $1A32, dann haben diese beiden 
Register nach Ausführung des Befehls 


$20/1A32- JML $4ß8516 


den folgenden Inhalt: PB = $40, PC = $8516. 
Der nächste Befehl wird also von der Adresse 
$40/8516 gelesen. 


® Den Befehl JSL („JSR long“). Der Operand 
hat ebenfalls eine Länge von drei Bytes. Vor der 
Ausführung werden der alte Inhalt des PC und 
der von PB auf den Stack gebracht (insgesamt 3 
Bytes), danach werden PB und PC wie bei JML 
mit den Werten des Operanden gesetzt. Bei- 
spiel: Wenn PB = $20 und PC = $1A32, dann 
haben diese beiden Register nach Ausführung 
des Befehls 


$20/1A32- JSL $498516 


den folgenden Inhalt: PB = $40, PC = $8516. 
Der nächste Befehl wird also von der Adresse 
$40/8516 gelesen. Auf dem Stack befinden 
sich drei Bytes als Rücksprungadresse, nämlich 
die Werte $35, $1A, $20. Der Befehl RTL („Re- 
turn long“) beendet das Unterprogramm, indem 
er diese drei Bytes wieder vom Stack holt und in 
PB/PC einsetzt. (Für Spezialisten: Der altbe- 
kannte „Fehler“ des 6502, nämlich die Spei- 
cherung einer um eins zu niedrigen Return- 
adresse, ist auch für „lange“ Unterprogramm- 
aufrufe erhalten geblieben.) 

Mit dem Befehl PFHK kann der momentane Inhalt 
des Programmbank-Registers auf den Stack 
gebracht werden - ein „Herunterholen“ ist da- 
gegen nur über ein RTL möglich. 


3.2. Datenbank-Register (DB) 


Der 65816 bildet eine (24-Bit-)Datenadresse, 
indem er einer gegebenen 16-Bit-Adresse den 
Inhalt des Datenbank-Registers voranstellt. Bei- 
spiel: Wenn DB den Inhalt $12 hat, führt der 
Befehl 


LDA $8ß949 


zum Laden des Akkumulators mit dem Inhalt 
der Speicherstelle $12/8040. (Wenn der Akku 
auf 16 Bit Breite gesetzt ist, wird zusätzlich die 
Speicherstelle $12/8041 gelesen.) 

Das Datenbank-Register ist vom Stand des Pro- 
grammbank-Registers unabhängig — selbstmo- 
difizierender Code (d.h. das Herumstochern im 
eigenen Programm) ist also nur dann möglich, 
wenn beide Register denselben Wert haben. 
Die Erzeugung von Datenadressen unterschei- 
det sich in einem wesentlichen Detail von der 
Erzeugung von Programmadressen: Die Über- 
schreitung einer momentan gesetzten 
Datenbank ist jederzeit möglich. Das folgende 
Beispiel kommt leider ohne einen Vorgriff auf 
die „indizierte Adressierung® nicht aus (Ss. 
6.1.6): Wenn DB den Wert $20 hat und das X- 
Register den Wert $4412 enthält, dann liest der 
Befehl 


LDA $2986,X 
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den Inhalt der Speicherstelle $20/6412 ($2000 
plus $4412 = $6412). Unter den gleichen Be- 
dingungen adressiert der Befehl 


LDA $Fß00,X 


die Speicherstelle $21/3412 ($F000 plus $4412 
= $13412) - der Überlauf wird also berücksich- 
tigt. Der Inhalt von DB wird durch diese Opera- 
tion nicht verändert. 

Dieses Verhalten gilt für alle „indizierten“ 
Adressierungen, ein „Unterlauf“ (d.h. die 
Adressierung einer Bank, die unterhalb des mo- 
mentanen Standes von DB liegt), ist dagegen 
nicht möglich. 


Der 65816 kennt zwei Möglichkeiten, bei der 
Adressierung von Daten den Inhalt von DB zu 
Ignorieren: 

© „Absolut lang“, d.h. durch die Angabe einer 
vollständigen Adresse (3 Bytes). Beispiel: 


LDA $22A4B2 


Dieser Befehl lädt den Akku mit dem Inhalt der 
Speicherstelle $22/A4B2. Der momentane In- 
halt von DB wird ignoriert, DB wird durch diese 
Operation nicht verändert. 

® ‚Seite 0“, d.h. durch die Angabe einer 
Adresse, die nur aus einem Byte besteht. Hier 
geschieht die Adressierung über das Direct- 
Register und bezieht sich immer auf Bank 00 (s. 
nächster Abschnitt). 

Unter Umständen ergeben sich dadurch Pro- 
grammierfehler, die äußerst schwierig zu finden 
sind. Beispiel: 


LDA $B199 
LDA $BOrFF 


‚ adressiert DB/ß19% 
‚ adressiert Öd/BÖFF 


Das Datenbank-Register kann mit dem Befehl 
PHB auf den Stack gebracht und mit PLB wieder 
heruntergeholt werden. Einen direkten Befehl 
wie „Lade DB mit <Wert>/<Registerinhalt>“ 
gibt es nicht. 


3,3. Direct-Register (D) 


Dieses Register hat eine Breite von 16 Bits und 
bestimmt die Startadresse der „Direct Page“ 
(Seite O oder „Zeropage“) innerhalb der Bank 
00. Der 65(C)02 kennt nur eine Nullseite, näm- 
lich den Speicherbereich von $0000 bis $OOFF, 
der 65816 kann dagegen bis zu 256 verschie- 
dene „Nuliseiten“ benutzen. Das Setzen des 
D-Registers auf den Wert $0000 definiert den 
Speicherbereich $00/0000..$00/00FF als Seite 
0 und entspricht damit dem Verhalten des 
65(C)02. Wenn das D-Register auf den Wert 
$0100 gesetzt wird, belegt die Seite O den 
Speicherbereich $00/0100..$00/01FF usw. 


Ein als „Direct Page“ definierter Speicherbe- 
reich hat die folgenden Eigenschaften und 
Grenzen: 

® Für die Adressierung einer Speicherstelle 
wird nur ein einziges Byte benötigt, die restliche 
Adresse fügt der Prozessor automatisch hinzu. 
Beispiel: Wenn D den Wert $0000 hat, dann 
adressiert der Befehl 


LDA $8F 


die Speicherstelle $00/008F. Wenn D den Wert 


67816 


$0900 hat, dann adressiert derselbe Befehl die 
Speicherstelle $00/098F. 

® Da das D-Register eine Breite von 16 Bits 
hat, ist der Programmierer nicht an Seitengren- 
zen gebunden. Wenn D den Wert $2344 hat, 
dann adressiert der Befehl „LDA $8F" die Spei- 
cherstelle $00/23D3. Um die Sache nicht unnö- 
tig zu komplizieren, werden wir im weiteren 
davon ausgehen, daß die Seite O immer auf 
einer Seitengrenze (d.h. auf $xx00) beginnt. 
(Falls Sie ein Liebhaber von völlig undurch- 
schaubarem Code sein sollten: Was ergibt die 
Befehlsfolge LDX #$2340 / TSC / TCD / STX 
So 7 ATS 2 

@ Speicherstellen der Seite O können als 
„Pointer“ benutzt werden, d.h. die Adresse ei- 
ner Speicherstelle enthalten (s. 6.1.8). Beispiel: 
Wenn D den Wert $0300 hat, die Speicherstelle 
$00/0320 den Wert $16 und die Speicherstelle 
$00/0321 den Wert $80, dann „zeigen“ diese 
beiden Speicherstellen auf die Adresse $8016. 
Der Befehl 





LDA ($29),Y 


lädt den Inhalt der Speicherstelle DB/8016 in 
den Akku, wenn Y den Wert $00 hat. Für Y = 
$01 wird DB/8017 adressiert, für Y = $02 
DB/8018 usw. Die Abschnitte 6.1.8, 6.2.1 und 
6.2.3 beschäftigen sich ausführlicher mit dieser 
Adressierungsart und ihren Erweiterungen. 

® Beim 65(C)02 kann mit einem „Nullseiten- 
Befehl“ nicht über die Nullseite hinaus adres- 
siert werden — beim 65816 dagegen schon. 
Beispiel: Wenn D den Wert $0000 hat und das 
X-Register den Wert $40 (8-Bit-Modus) enthält, 
dann adressiert der Befehl 


LDA $E9,X 


auf einem 65(C)02 (bzw. auf einem 65816 im 
„Emulation Mode“) die Speicherstelle $(00/) 
0020 ($EO plus $40 = $020, der Überlauf wird 
ignoriert). Im „Native Mode" wird dagegen die 
Speicherstelle $00/0120 adressiert, d.h. der 
Überlauf wird berücksichtigt. Das gilt auch für 
Indexregister mit 16 Bit Breite: Wenn D = 
$0000 und X = $2000, dann adressiert der 
oben gezeigte Befehl die Speicherstelle $00/ 
$20E0. 

@® Adressierungen der Seite O finden grund- 
sätzlich in der Bank 00 statt -— diese Bank läßt 
sich durch indizierte Adressierung nicht über- 
schreiten (vgl. 3.2). Wenn D = $9000 und X = 
$4000, dann adressiert der Befehl 


LDA $84,X 


nicht etwa die Speicherstelle $01/3084, son- 
dern $00/3084 — dieser Überlauf wird nicht 
berücksichtigt. 


Programmiertricks wie z.B. die sich selbst modi- 
fizierende Routine CHRGET in Äpplesoft dürf- 
ten der Vergangenheit angehören. Es wäre zwar 
möglich, ein Unterprogramm zu schreiben, das 
innerhalb der momentan gesetzten Seite 0 ab- 
lauft — es müßte aber mit einem JSL aufgerufen 
werden und mit einem RTL enden (sehr unöko- 
nomisch). 


Durch die Tatsache, daß sowohl die Seite O als 
auch der Stack innerhalb der Bank 00 frei be- 
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Seit einiger Zeit sieht man in der Fach- 
presse einschlägige Anzeigen: Megacore, 
Megaboard und MDB mit unterschiedli- 
chen Speicherkapazitäten. Das Kernstück 
all dieser zur Verfügung stehenden Mög- 
lichkeiten ist immer MEGA-BOARD, der 
Harddisk-Controller mit Software. Peeker 
hat für Sie beim Hersteller, der Firma 
Frank & Britting GmbH, preisgünstige 
Sonderkonditionen für die Produktreihe 
„Mobile Datenbox" ausgehandelt. Die Re- 
sonanz auf die Angebote war gut. Es hat 
sich gezeigt, daß viele Apple-Anwender 
von den neuen Möglichkeiten, die diese 
externe Speichererweiterung bietet, be- 
geistert sind, aber den finanziellen Auf- 
wand scheuen. 


Peeker hat sich deshalb wieder mit Frank 
& Britting in Verbindung gesetzt. Durch 
das Entgegenkommen des Herstellers ist 
es nun möglich, auch einen preiswerten 
Harddisk-Bausatz zu erwerben. Er enthält 
den Controller, den Kabelsatz, die Soft- 
ware und eine 10-Megabyte-Fesiplatte 
(ohne Netzteil). Diesen Bausatz (Bau- 
satz 1) können Sie wie die MDB beim 
Hüthig-Software-Service inkl. DB-Meister 
für DM 1482,— beziehen. 


Wenn Sie über andere Platten-Kapazitäten 
verfügen (bis 64MB) oder selbst eine 
Festplatte kaufen möchten, können Sie 
den Controller mit Software und Kabelsatz 
auch getrennt erwerben. Harddisks gibt es 
gebraucht recht günstig auf dem Markt. 
Der Fachhandel bietet standardisierte 
Netzteile und Gehäuse. 

Der Controller mit dem speziellen Flach- 
bandkabel und der Software kann direkt 
beim Entwickler und Hersteller Frank & 
Britting für DM 898,- bezogen werden 
(Bausatz 2, ohne DB-Meister). Die Firma 
Frank & Britting entwickelt seit Jahren 
Controller für Harddisk-Subsysteme, unter 
anderem auch MEGA-BOARD für Apple Il, 
II+, Ile und den |Igs. Alle Produkte werden 
von Frank & Britting selbst hergestellt und 
durchlaufen bis zur Auslieferung mehrere 
Funktionstests. Die Qualitätsanforderun- 
gen an die Produkte sind sehr hoch: Ein 
Megaboard z.B. wird, nachdem es von der 
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Produktionsabteilung kommt, erst nach 
einstündigem Dauertest auf speziellen 
Rechnersystemen freigegeben. Danach 
durchläuft es noch Tests am Apple, wo 
möglichst alle ungünstigen Systemvoraus- 
setzungen simuliert werden. Somit wird 
gewährleistet, daß nur Produkte ausgelie- 
fert werden, die 100%ig in Ordnung sind. 


Aufbau eines kompletten Harddisk- 
Subsystems: 


1. Controller 

2. Software 

3. Spezielles Flachbandkabel (40adrig, 1,5 
Meter lang) 

4, Power-Kabel mit genormten 4-Pol-HD- 
Anschlußstecker 

5. Ausführliches Handbuch 

6. Harddisk mit einer ST506- oder ST412- 
Schnittstelle (Standard-Schnittstelle von 
Festplatten im Kapazitätsbereich von 5 MB 
bis 80 MB, mit 34-Pol- und 20-Pol-Stek- 
Kerleiste) 

7. Netzteil (5 Volt/mindestens 2 Ampere, 
12 Volt/mindestens 3 Ampere) 





Bild 1: Lieferumfang Frank & Britting 


Der Lieferumfang von MEGA-BOARD um- 
faßt die Produkte unter Punkt 1 bis 5 (s. 
Bild 1). Die Verbindung der einzelnen 
Komponenten ist sehr einfach (s. Bild 2). 
Der Controller wird in einen freien Slot 
gesteckt und mit dem 40-Pol-Stecker des 
Flachbandkabels verbunden. An der ande- 
ren Seite des Kabels befinden sich ein 34- 
Pol- und ein 20-Pol-Stecker. Beide wer- 
den einfach auf die ST506-Schnittstelle 
der Harddisk gesteckt. Dann wird die vor- 


Sonderangebot für Peeker-Leser - Sonderangebot für Peek 


Festplattenlösung als 
Bausatz für jedermann 





Bild 2: Gesamte Soft- und Hardware für 
den Selbstbau 


gefertigte und entsprechend bezeichnete 
5-Volt-Leitung des Flachbandkabels am 
Netzteil angeschlossen oder an der Fest- 
platte angelötet (für die externe Span- 
nungsversorgung des Controllers). Das 
vorgefertigte Power-Kabel für die Festplat- 
te wird mit dem verpolgeschützten 4-Pol- 
Spannungsnormstecker auf die Harddisk 
gesteckt (s. Bild 3). Entsprechend der 
Steckeraufschrift werden dann die Kabel 
mit dem Netzteil verbunden. 


Das Netzteil sollte einem guten Qualitäts- 
standard entsprechen. Harddisk-Laufwer- 





Bild 3: Die Steckpositionen im Detail 
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ke reagieren empfindlich auf Störungen 
und Unregelmäßigkeiten der Spannungs- 
versorgung. Die Harddisk braucht zwei 
Spannungsversorgungen mit +5 Volt und 
+12 Volt, die Spannungen haben gemein- 
same Masse. Beide Masseleitungen soll- 
ten getrennt bis zum Netzteil geführt wer- 
den. Die Ströme sind recht unterschied- 
lich, präzise Werte sind ggf. den 
Datenblättern des Laufwerkes zu entneh- 
men. Als Standardwerte gelten bei +5 Voit 
(inkl, 0,9 Ampere für den Controller, der 
vom externen Netzteil versorgt wird) etwa 
1,8 Ampere, bei +12 Volt etwa 1,5 Ampe- 
re. Allerdings ist bei der Dimensionierung 
des Netzteils zu beachten, daß beim 
„Hochlaufen“ der Hardaisk der 12-Volt- 
Teit für 10 Sekunden mit etwa 2 Ampere 
belastet wird. Deshalb empfiehlt es sich, 
eine Leistungsreserve zu kalkulieren und 
mit 5V/2ZA bzw. 12V/3A zu rechnen. 

















Bild 4: Mit wenigen Handgriffen zusam- 
mengestecktes, betriebsferliges Sy- 


siem 


In verschiedenen Fachzeitschriften, Hob- 
by- und Computerläden werden preiswer- 
te und leistungsfähige Netzteile angebo- 
ten. Bei Apple-kompatiblen Rechnern im 
IBM-Gehäuse beispielsweise ist in den 
meisten Fällen das Netzteil für die zusätzli- 
che Last einer Harddisk ausreichend di- 
mensioniert. Gehäuse für die Harddisk 
sind ohne Schwierigkeiten zu bekommen. 
Man sollte hierbei auf die Möglichkeit aus- 
reichender Belüftung achten, entweder 
durch Schlitze bzw. Löcher im Gehäuse 
oder durch einen eingebauten Lüfter. Eine 
Harddisk kann in der Regel bei Betriebs- 
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temperaturen zwischen 5 und 55 Grad 
Celsius arbeiten. Die obere Grenze der 
zulässigen Betriebstemperatur wird im ge- 
schlossenen Gehäuse ohne entsprechen- 
de Belüftungsmaßnahmen, gerade bei 
warmer Umgebungsluft wie im Sommer, 
leicht erreicht. Die Festplatte kann irgend- 
wo am Arbeitsplatz untergebracht werden, 
denn das Flachbandkabel darf bis 5 Me- 
ter(!) lang sein. 


Harddisk-Parameter 


Die Festplatten unterscheiden sich unter- 
einander durch die Anzahl der Köpfe 
(HEAD), Anzahl der Zylinder (CYL), durch 
verschiedene Zugriffsmodi (FAST SEEK) 
und verschiedene Schreibströme (WRITE 
PRECOMP, WP). Frank & Britting hat be- 


Beispiele Harddisk-Parameter 


Laufwerk formatiert 
Rodime RO 352 
Rodime RO 2ß4E 
Lapine Titan 3532 
Seagate ST 412 
Segeate ST 586 


BASF 6188 
Microscience HH725 
CDC 9415-528 
Micropolis 1323 
Miniscribe 3425 
Tandon TM 252 





Wie wird bestellt? 

Sie senden Ihre Bestellung an den Hüthig- 
Software-Service. Sie erhalten dann von 
der Firma Frank & Britting eine Voraus- 
rechnung, nach deren Überweisung Ihnen 
von dort Bausatz 1 oder Bausatz 2 geliefert 
wird. Wenn Sie Bausatz 1 bestellen, erhal- 
ten Sie gleichzeitig vom Hüthig-Software- 
Service das Programm DB-Meister (2 Dis- 
ketten und ein Handbuch) in der für die 
MDB bereits angepaßten Version. Nach ei- 
ner geringfügigen Änderung im Hello-Pro- 
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wußt vermieden, diese Parameter über 
Hardware-Brücken, Mäuseklaviere etc. 
einzustellen. Sämtliche laufwerkspezifi- 
schen Parameter können per Software 
eingestellt werden. In der Tabelle finden 
sich einige Beispiele für auf dem Markt 
befindliche Festplattenlaufwerke. 


Bei dem Initialisieren der Platte werden 
diese Werte vom Initialisierungsprogramm 
erfragt. Danach wird formatiert, und das 
Harddisk- Subsystem ist betriebsbereit. 


In manchen Datenblättern ist der Wert 
„FAST SEEK“ nicht zu finden. In diesem 
Fall gilt folgende Regel: Wenn der Wert 
der durchschnittliichen Zugriffszeit 
(Datenblatt) kleiner als 100ms ist, wird 
FAST SEEK mit „Y” beantwortet. 


WP ab CYL 
256 
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gramm können Sie diese Neuversion des 
DB-Meisters übrigens auch zusätzlich auf 
35-Spur-Laufwerken einsetzen. 

Zur Bestellung können Sie eine der im 
Peeker eingehefteten Bestellkarten ver- 
wenden. Stichwort: 

Bausatz 1: Megaboard-Controller, Kabel- 
satz, Software, 10MB-Festplatte, DB-Mei- 
Ster........ Sonderangebot DM 1482, - 
Bausatz 2: Megaboard-Controller, Flachband- 
kabel, Software......Sonderangebot DM 898,- 


iD Hüthig Software Service 
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weglich sind, kann eine neue (katastrophale) Art 
von Programmierfehler auftreten, die es beim 
65(C)02 aufgrund der fixierten Speicherberei- 
che überhaupt nicht gibt - nämlich den Überlauf 
des Stacks in die momentan benutzte Seite 0 
hinein. 


Das D-Register kann sowohl über den Befehl 
PHD auf den Stack gebracht als auch mit PLD 
wieder zurückgeladen werden. Einen direkten 
Ladebefehl wie („Lade D mit <Wert>") gibt es 
nicht, dafür aber die Befehle TCD (Akku-Inhalt 
nach D) und TDC (D-Inhalt zum Akku). Der 
Buchstabe „C“ steht hier für die Tatsache, daß 
der Akku bei diesen beiden Befehlen immer als 
16-Bit-Register behandelt wird — unabhängig 
davon, auf welche Breite er momentan gesetzt 
ist. 


3.4. Stackpointer (SP) 


Wie bereits erwähnt, benutzt der 65(C)02 den 
fixen Speicherbereich von $0100 bis $O1FF als 
Stack. Der Stackpointer hat eine Breite von 8 
Bits und zeigt (im Gegensatz zu den meisten 
anderen Prozessoren) nicht auf die zuletzt be- 
legte Speicherstelle, sondern auf den jeweils 
nächsten freien Speicherplatz. 

Der Stack „wächst“ in Richtung absteigender 
Adressen - das Speichern von n Bytes auf dem 
Stack setzt SP um n herab. Bild 3 gibt ein 
Beispiel für den 65(C)02 (Registerbreite: 8 
Bits), in dem der Akku-Inhalt ($20) zuerst auf 
den Stack gebracht und danach wieder herun- 
tergeholt wird. 


| 


sp 





| 20 |- 
EEE A EEE 
| 


vorher | PHA 





Bild 3: Stackpointer beim 6502 


Der einzige Unterschied zum 65(C)02 besteht 
darin, daß der Stackpointer des 65816 eine 
Breite von 16 Bits hat und der Stack damit nicht 
mehr auf eine Speicherseite (d.h 256 Bytes) 
begrenzt ist — er kann mit einer beliebigen 
Adresse innerhalb der Bank 00 beginnen. 


Stack und Stackpointer haben beim 65816 die 
folgenden Eigenschaften und Grenzen: 

© Als Speicherbereich wird grundsätzlich die 
Bank 00 benutzt - unabhängig von den Inhalten 
der Register PB, DB und D. 


® Der Stackpointer bewegt sich bei Über- und 
Unterlauf im Kreis. Eine Erniedrigung über 
$0000 hinaus (zuviele „Push“-Operationen) 
setzt ihn auf den Wert $FFFF und erniedrigt ihn 
von da aus weiter, eine Erhöhung über $FFFF 
hinaus (zuviele „Pull“-Operationen) setzt ihn 
auf den Wert $0000 und erhöht ihn von da aus 
weiter. 

@ Adressierungen des Stacks können nie Über 
die Bank 00 hinausgehen, selbst dann nicht, 
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wenn mit Indizierung gearbeitet wird (s. 6.2.9). 
Beispiel: Wenn SP = $FFFO, dann adressiert 
der Befehl 


LDA $49,5 ; SP plus "Offset" $49 


nicht die Speicherstelle $01/0030, sondern 
$00/0030. 

Es existieren weder direkte Befehle, mit denen 
man den momentanen Wert des Stackpointers 
auf den Stack bringen bzw. ihn herunterholen 
kann, noch Befehle wie „Lade SP mit 
<Wert>", (Falls Ihnen der Gedanke daran 
merkwürdig vorkommen sollte: Mit dem Z80 
geht so etwas ohne Schwierigkeiten). Für den 
Transfer zwischen einem Register und dem 
Stackpointer gibt es dagegen gleich vier Mög- 
lichkeiten: TSC und TCS (Stackpointer — 16- 
Bit-Akku und umgekehrt) sowie TSX und TXS 
(Stackpointer — X-Register und umgekehrt). 
Der letzte dieser vier Befehle hat einen ganz 
speziellen „Haken“ (s. Abschnitt 4.2). 


3.5. Akku und Indexregister 
(A,X und Y) 


Der Akkumulator (A) ist das zentrale (und einzi- 
ge) Rechenregister des Prozessors — sämtliche 
logischen (AND, ORA, EOR) und arithmeti- 
schen Operationen (Addieren, Subtrahieren) 
lassen sich nur über ihn ausführen, 

Rotations- und Schiebebefehle (ROL, ROR, 
ASL, LSR) sind dagegen sowohl über den Akku 
als auch direkt auf Speicherstellen anwendbar. 
Für Operationen mit diesem Register stehen die 
meisten Adressierungsarten zur Verfügung (23 
von 24 Adressierungsarten). 

Der Akku des 65(C)02 ist grundsätzlich 8 Bit 
breit, der des 65816 läßt sich (getrennt von den 
Indexregistern) zwischen 8 und 16 Bits um- 
schalten (s. 3.6.3). 

Wenn der Akku des 65816 auf 8 Bit Breite 
gesetzt ist, bleiben die höherwertigen 8 Bits in 
den Tiefen des Prozessors verborgen. Diesen 
Platz kann man unter dem Registernamen B als 
Zwischenspeicher benutzen, wobei nur eine 
einzige Operation definiert ist: 


XBA : Tausch AL — AH 


Hier handelt es sich um einen echten Tausch: 
Der vorherige Inhalt des 8-Bit-Akkus befindet 
sich danach im Register „B“, der des „B”- 
Registers im Akku. Die Flags N und Z werden 
entsprechend dem neuen Akku-Inhalt gesetzt. 

Da das „B“-Register (im Gegensatz zu den 
höherwertigen Teilen der Indexregister X und Y) 
durch Umschalten der Breite des Akkus nicht 
gelöscht wird, ist dieser Befehl eine wesentlich 
schnellere Alternative zur Speicherung auf den 
Stack. Der Befehl XBA funktioniert auch dann, 
wenn der Akku auf 16 Bit Breite gesetzt ist - in 
diesem Fall wird das höherwertige Byte mit dem 
niederwertigen ausgetauscht. Das folgende 
Programmfragment könnte eine vierstellige 
Hexzahi ausgeben: 


LDA #+62476 « Akku <- $2476 
XBA ; Akku: $7624 

JSR xxx ; Ausgabe von $24 
XBA ‚ Akku: $2476 

JSR xxx ; Ausgabe von $76 


Die konventionelle Alternative dazu sieht we- 
senilich umständlicher aus: 


LDA #$2476 

PHA ; Zwischenspeichern 
LSR@A ; höherwertigen Teil 

LSRF A ‚ nach links verschieben 
a ; 8mal: Akku <- $0076 
JSR xxx ; Ausgabe von $24 


PLA : Original zurück 
AND #$BÖFF ; bleibt $6ß#76 
JSR xxx ; Ausgabe von $76 


Die Indexregister des Prozessors (X und Y) sind 
nicht für Rechenoperationen vorgesehen, son- 
dern zur indizierten Adressierung von Daten. 
Bevor Sie über diese Erklärung den Kopf schüt- 
teln, folgt ein Beispiel: Der Befehl 


LDA $20896,X 


lädt den Akku mit dem Inhalt der Speicherstelle 
$2000, wenn das X-Register den Wert O hat, für 
X = 1 wird $2001 adressiert, für X = 2 $2002 
usw. (für den 65816: DB/2000, DB/2001, DB/ 
2002...). 

Folgerichtig sind arithmetische Operationen mit 
den Indexregistern nur sehr beschränkt mög- 
lich. Man kann ihren Inhalt um eins erhöhen 
(INX, INY), um eins erniedrigen (DEX, DEY) 
sowie Vergleiche ausführen (CPX, CPY = 
„Compare X" bzw. „Compare Y“). Additionen 
oder Bitmanipulationen mit den Inhalten der 
Indexregister sind nicht definiert. 

Die Indexregister des 65(C)02 haben grund- 
sätzlich eine Breite von 8 Bits — mit dem zuvor 
gezeigten Beispiel lassen sich also Speicher- 
stellen im Bereich von $2000 bis $20OFF (d.h. 
eine „Speicherseite”) adressieren. 

Die Indexregister des 65816 lassen sich ge- 
trennt vom Akkumulator zwischen 8 und 16 Bit 
umschalten (s. 3.6.3). Der Befehi „LDA 
$2000,X" hat im letzteren Fall eine „Reichwei- 
te“ von DB/2000 bis DB+1/IFFF. (Um ganz 
korrekt zu sein: Wenn der Akku ebenfalls auf 16 
Bits gesetzt ist und X den Inhalt $FFFF hat, 
werden die Speicherstellen DB+1/$1FFF und 
DB+ 1/$2000 angesprochen). 

Der 65(C)02 kennt bereits zahlreiche Adressie- 
rungsarten und Transfermöglichkeiten für die 
beiden Indexregister, die beim 65816 noch er- 
weitert worden sind. Die erfreulichsten Neue- 
rungen bestehen aus einer direkten Transfer- 
möglichkeit zwischen X und Y über die Befehle 
TXY und TYX sowie den (bereits auf dem 65002 
implementierten) direkten Stackoperationen 
(PHX,aPHY, BESSER 


3.6. Das Prozessorstatusregister (P) 


Dieses Register besteht aus einer Reihe einzel- 
ner Bits („Flags“), die voneinander getrennt 
behandelt werden, seine „Breite“ (8 Bits für 
sämtliche Prozessoren der 65er-Familie) ist nur 
im Zusammenhang mit Stackoperationen inter- 
essant. 

Die Bits M und X sind beim 65(C)02 nicht 
definiert und haben immer den Wert „1“, sind 
also immer gesetzt. Dasselbe ist der Fall, wenn 
sich der 65816 im „Emulation Mode“ befindet. 
Bild 4 gibt die Reihenfolge und Bedeutung der 
einzelnen Bits noch einmal wieder. 

Die einzelnen Bits des P-Registers werden 
durch die Ergebnisse von Rechenoperationen 
gesetzt. Der Prozessor kennt eine Reihe von 
Sprungbefehlen, die abhängig vom Stand der 
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*) 65(C)02 sowie im „Emulation Mode“ des 
658xx: Wird als „O“ auf den Stack geschrieben, 
wenn durch IRQ unterbrochen wird (s. Ab- 
schnitt 5), hat ansonsten immer den Wert „1”. 


Bild 4: Status-Register 


einzelnen Bits ausgeführt oder ignoriert werden 
(„bedingte Sprünge"). Die nächsten Abschnitte 
enthalten zahlreiche Beispiele dazu, 

Achtung: Im Gegensatz zu den meisten ande- 
ren Prozessoren werden die Bits Z, V und N 
auch durch Register-Ladeoperationen gesetzil 
Vorteil: Die z.B. vom Z80 her gewohnte Be- 
fehlsfolge „OR A,00° kann man sich in den 
meisten Fällen sparen. Nachteil: Ein Ablauf wie 
der folgende funktioniert meistens nicht: 


<Prüfung> ; setzt Flags 
<Ladeoperation> ;‚ mit Wert A 

<bedingter Sprung> ; zu <weiter> 
<Ladeoperation> ; mit Wert B 

<weiter> ... 


Auf einem Z80 oder einem 8088 nimmt dieses 
Programmfragment eine Prüfung vor und lädt 
ein Register abhängig vom Ergebnis der Prü- 
fung entweder mit dem Wert A oder dem Wert 
B. 

Auf einem 65(C)02 oder einem 65816 werden 
die Flags durch die Ladeoperation mit dem Wert 
A neu gesetzt, der darauffolgende Sprung ba- 
siert also nicht mehr auf dem Ergebnis der 
Prüfung, sondern auf dem soeben geladenen 
Wert A. Um das gewünschte Ergebnis zu errei- 
chen, muß die Routine folgendermaßen formu- 
liert werden: 


<Ladeoperation> ; mit Wert A 
<Prüfung> ‚ setzt Flags 
<bedingter Sprung> ; zu <weiter> 
<Ladeoperation> ;‚ mit Wert B 
<weiter>,..- 


Der 65(C)02 kennt nur eine einzige ÄAdressie- 
rungsart des P-Registers, nämlich die Befehle 
PHP („Push P-Register auf den Stack“) und 
PLP („Pull P-Register"), wobei jeweils ein Byte 
auf dem Stack belegt bzw. wieder freigegeben 
wird. Beim 65816 sind die Befehle SEP („Set P- 
Bits“) und REP („Reset P-Bits“) hinzugekom- 
men, mit denen einzelne Bits direkt gesetzt 
bzw. gelöscht werden können. 


3.6.1. Das N-Flag („Negativ-Flag“) 


Es wird gesetzt, wenn das Ergebnis einer Ope- 
ration im Zweierkomplement einen negativen 
Wert darstellen würde. („Zweierkomplement“: 
Die Werte $00 bis $7F bzw. $0000 bis $7FFF 
werden als positive Zahlen von dezimal O bis 
127 bzw. O0 bis 32767 definiert. Werte von $80 
bis $FF bzw. $8000 bis $FFFF werden als nega- 
tive Zahlen interpretiert, die Bereiche gehen 
von dezimal -128 ($80) bis -1 ($FF) bzw. von 
-32768 ($8000) bis -1 ($FFFF). Eine negative 
Zahl wird dadurch gekennzeichnet, daß das 
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höchstwertige Bit eines Operanden gesetzt ist 
($7F binär: 0111 1111, $80 binär: $1000 
0000)). 

Das N-Flag wird durch vier Arten von Operatio- 
nen gesetzt: 


® Ladevorgänge: „LDA $A000" setzt N, wenn 
der Inhalt von $A000 größer $80 bzw. der Inhalt 
von $A000/$A001 größer $8000 ist, ansonsten 
wird es gelöscht; 

@® Rechen- und Schiebeoperationen setzen N, 
wenn die folgende Bedingung zutrifft, anson- 
sten wird das Flag gelöscht: 

— Addition: Ergebnis größer $7F bzw. $7FFF; 

— Subtraktion: Ergebnis kleiner O (d.h. $FF..$80 
bzw. $FFFF..$8000); 

— Linksschieben oder -rotieren: Ergebnis hat 
höchstes Bit gesetzt; 

— Rechtsrotieren: Ergebnis hat höchstes Bit ge- 
seizt,; 

— Vergleich: Vergleichsoperand ist größer. 

@ Erhöhen und Erniedrigen von Registern/ 
Speicherstellen: Wenn das Ergebnis im Bereich 
680..$FF bzw. $8000 bis $FFFF liegt, wird N 
gesetzt, ansonsten gelöscht. 

® Den Befehl BIT: Dieser Befehl kopiert das 
höchstwertige Bit des adressierten Operanden 
auf das N-Flag, ohne den Inhalt des Akkus zu 
verändern. Wenn der Operand größer als $7F 
bzw. $7FFF ist, wird das N-Flag gesetzt, anson- 
sten wird es gelöscht. 


Betrachten wir beispielsweise eine Befehlsfolge 
wie: 


LDX $ABB 
DEX 


: X <- Inhalt von $AddB 


Der Befehl DEX erniedrigt den Inhalt von X um 
eins. Wenn wir davon ausgehen, daß X auf acht 
Bit Breite gesetzt ist, ergeben sich die folgen- 
den Möglichkeiten: 

— wenn $A000 einen Wert im Bereich $81..$FF 
enthält, bleibt das N-Flag gesetzt, weil X auch 
nach der Operation einen Wert größer/gleich 
$80 enthält; 

— wenn $A000 den Wert $80 enthält, dann hat X 
nun den Inhalt $7F: Das N-Flag wird durch die 
zweite Operation gelöscht; 

— wenn $A000 einen Wert zwischen $01 und 
$7F enthält, bleibt das N-Flag unverändert ge- 
löscht: X enthält einen Wert zwischen $00 und 
$7E; 

— wenn $A000 den Wert $00 enthält, wird das 
N-Flag durch die zweite Operation gesetzt: X 
enthält nun den Wert $FF. 

Mit dem Befehl SEP #$80 kann das N-Flag 
explizit gesetzt, mit REP #$80 explizit gelöscht 
werden. Der Befehl BMI („Branch on Minus") 
führt zu einem Sprung, wenn das N-Flag ge- 
setzt ist; wenn es gelöscht ist, wird er ignoriert. 
Der Befehl BPL („Branch on Plus“) verhält sich 
umgekehrt — er wird nur dann ausgeführt, wenn 
das N-Flag gelöscht ist. 


3.6.2. Das V-Flag 
(„oVerflow“ = Überlauf) 


Dieses Flag dient der Erkennung eines Zweier- 
komplement-Überlaufs. Es wird nur durch zwei 
Arten von Operationen beeinflußt: 

® Durch Addition und Subtraktion: Wenn sich 
während einer derartigen Operation das Vorzei- 
chen (also das N-Bit) ändert, dann wird das V- 


Flag gesetzt - aber nur dann, wenn der dazuad- 
dierte bzw. subtrahlerte Wert kleiner als $80 
bzw. $8000 ist. In allen anderen Fällen wird es 
gelöscht, also wenn 


— ein Wert addiert oder subtrahiert wird, der 
einen Vorzeichenwechsel erzwingt (größer/ 
gleich $80 bzw. größer/gleich $8000) oder 

— sich während der Operation der Stand des N- 
Flags nicht ändert. 

® Durch den Befehl BIT: Dieser Befehl kopiert 
das zweithöchste Bit des adressierten Operan- 
den auf das V-Flag. 


Ein einmal gesetzter Zustand des V-Flags ist 
außerordentlich langlebig — er wird weder durch 
Vergleiche, Schiebeoperationen noch durch Er- 
höhungen/Erniedrigungen von Registern/Spei- 
cherstellen verändert. 

Mit dem Befehl CLV (ersatzweise REP #$40) 
kann das V-Flag explizit gelöscht, mit SEV (oder 
SEP #$40) 'kann es explizit gesetzt werden. 
Der Sprungbefehl BVS wird nur dann ausge- 
führt, wenn das V-Flag gesetzt ist, der Sprung- 
befehl BVC wird nur bei gelöschtem V-Flag 
ausgeführt. Aufgrund seiner „Langlebigkeit“ 
wird dieses Flag recht gerne zweckenifremdet, 
um z.B. eine bestimmte Bedingung zeitweilig 
zwischenzuspeichern. 


3.6.3. Die Flags M und X 
(„Memory“ und „indeX“) 


Diese beiden Bits haben beim 65(C)02 sowie 
im „Emulation Mode” des 65816 grundsätzlich 
den Wert „1”, sind also gesetzt. Im „Native 
Mode“ des 65816 bestimmen sie die Breite des 
Akkumulators (M = 1: 8 Bit, M = 0: 16 Bit) 
sowie die der Indexregister (X = 1: X- und Y- 
Register 8 Bit, X = 0: X- und Y-Register 16 Bit). 
Verzweigungen, die vom Stand dieser beiden 
Bits abhängig sind, kennt der 65816 nicht — es 
existiert lediglich die Möglichkeit, die Bits mit 
den Befehlen REP und SEP zu löschen bzw. zu 
setzen: 

@ SEP #$20 setzt M (und damit den Akku auf 8 
Bit Breite), REP #$20 löscht dieses Flag. Der 
Inhalt des Akkus wird durch diese Befehle nicht 
beeinflußt — nach einem SEP #$20 wird der 
höherwertige Teil lediglich „versteckt“; 

® SEP #$10 setzt X (und damit die Indexregi- 
ster auf 8 Bits), REP #$10 löscht das Flag X und 
setzt 16 Bit breite Indexregister. Der Befehl SEP 
#$10 führt eine automatische Löschung des 
höherwertigen Teils der Indexregister aus (s.a. 
42). 

@ SEP #$30 ist identisch mit der Befehlsfolge 
SEP #$20/SEP #$10 und setzt A, X und Y auf 
8 Bits; REP #$30 entspricht REP #$20/REP 
+#$10 und setzt A, X und Y auf 16 Bits. 


Die Breite der jeweiligen Register ist bei Opera- 
tionen mit Speicherstellen ausschlaggebend 
dafür, ob eine oder zwei Adressen angespro- 
chen werden. Beispiele: 


SEP +$30 ; A, X und Y: 8 Bit 
LDA $ABBd ; lädt $AB00 

CMP $BRdd ; vergleicht mit $Bßg® 
STX $1FFPF ; X-Inhalt -> $1FFF 


Dieselbe Befehlsfolge, mit REP #$30 eingelei- 
tet, würde A mit dem Inhalt der Speicherstellen 
$A000/$A001 laden, den Akku-Inhalt mit den 
Speicherstellen $B000/$B001 vergleichen und 
den Inhalt von X in $1FFF/2000 ablegen. 
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Mit den (teilweise recht delikaten) Problemen, 
die sich bei Datentransfers zwischen Registern 
unterschiedlicher Breite ergeben, beschäftigt 
sich der gesamte Abschnitt 4, in dem auch die 
Umschaltung zwischen „Emulation Mode“ und 
„Native Mode“ behandelt wird. 


3.6.4. Das D-Bit („Decimal) 


Über dieses Bit kann der Prozessor zwischen 
„normaler“ Rechenweise und („packed“) 
BCD-Arithmetik umgeschaltet werden. Im er- 
sten Fall rechnet der Akku mit Werten im Be- 
reich von O bis 255 (bzw. -128 bis +127), im 
zweiten Fall werden jeweils vier Bits zur Dar- 
stellung einer Dezimalzahl benutzt, der Re- 
chenbereich erstreckt sich damit von 00 bis 99. 
Für den Betrieb mit 16 Bits ergeben sich die 
Bereiche 0..65535 (bzw. -32768..+32767) so- 
wie 0000 bis 9999 (geht beim 68000 nicht), 

So gut wie alle Prozessoren verfügen über eine 
derartige Umschaltmöglichkeit, die allerdings in 
den seltensten Fällen genutzt wird (Turbo BCD 
von Borland ist eines der wenigen kommerziel- 
len Programme, die dem D-Bit - hier dem Äqui- 
valent des 8086/88 - zu seiner Existenzberech- 
tigung verhelfen). 

Der einzige Unterschied zwischen dem 
65(C)02 und dem 65816 besteht darin, daß das 
D-Bit bei letzterem durch ein Reset automatisch 
gelöscht wird (s. Abschnitt 5). Als Apple-Ent- 
wickler hat man aber offensichtlich solche Äng- 
ste vor gesetzten D-Flags, daß auch die Reset- 
Routine im Monitor des Ilgs noch mit einem 
CLD beginnt. 

Der Befehl CLD (ersatzweise REP #$08) löscht 
das D-Flag und setzt den „normalen“ Modus, 
der Befehl SED (bzw. SEP #$08) setzt das D- 
Flag und schaltet auf BCD-Arithmetik um. 
Sprungbefehle, die sich auf den Zustand des D- 
Flags beziehen, gibt es nicht. 


3.6.5. Das I-Flag (Interruptsperre) 


Wird zum Sperren und Entsperren von |IRQ- 
Anforderungen (Interrupt request; hardwaremä- 
Biger, sperrbarer Interrupt) verwendet und hat 
bei sämtlichen Mitgliedern der 65er-Familie die- 
selbe Funktion. SEI (ersatzweise SEP #$04) 
sperrt IRQ-Anforderungen, CLI (oder REP 
+#$04) läßt Interrupts zu. Ein durch den Befehl 
BRK ausgelöster „Software-"Interrupt wird 
durch den Zustand des |-Flags nicht beeinflußt. 
Näheres zur Funktion in Abschnitt 5. 


3.6.6. Das Z-Flag („Zero" = Null) 


Dieses Flag wird gesetzt, wenn eine Operation 
den Wert $00 ergibt, ansonsten wird es zurück- 
gesetzt. Unterschiede zwischen 65(C)02 und 
65816 gibt es nicht, wenn man von der Möglich- 
keit des direkten Setzens über die Befehle REP 
und SEP absieht (s.u.). Ähnlich dem N-Flag wird 
das Z-Flag durch eine Vielzahl von Operationen 
verändert: 

® Ladevorgänge: Wenn ein Register mit dem 
Wert $00 (bzw. $0000) beladen wird, setzt die- 
se Operation das Z-Flag. Ist der Wert ungleich 
$00, wird Z gelöscht; 

@ Addition und Subtraktion: Wenn das Ergebnis 
den Wert $00 (oder $0000) hat, wird das Z-Flag 
gesetzt. Achtung: Das ist auch bei einem Über- 
oder Unterlauf der Fall: Im 8-Bit-Modus ergibt 
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die Befehlsfolge LDA #$90 / CLC / ADC #$70 
das Ergebnis $100, d.h. der Akku enthält da- 
nach den Wert $00. 

® Schieben und Rotation: Wenn der verblei- 
bende Operand den Wert $00 (oder $0000) hat, 
wird das Z-Flag gesetzt, ansonsten wird es ge- 
löscht. Beispiel: Das Rechtsschieben einer 
Speicherstefle mit dem Inhalt $01 setzt diese 
Speicherstelle auf den Wert $00 und setzt damit 
das Z-Flag. Analoges gift für das Linksschieben 
einer Speicherstelle oder des Akkus mit dem 
Wert $80 (im 8-Bit-Modus). 

@ Erhöhung und Emniedrigung: Z wird abhängig 
davon gesetzt, ob das Ergebnis der Operation 
den Wert $00 hat oder nicht. Zur Abwechslung 
ein Beispiel im 16-Bit-Modus: 


LDX #+$9091 : <> $69: löscht 2 
DEX ; X=d000: setzt Z 
DEX : X=$FFFF: löscht Z 


® Vergleiche: der Prozessor führt jeden Ver- 
gleich „intern“ als Subtraktion aus— nur daß der 
numerische Wert des Ergebnisses in keinem 
Register festgehalten wird. Ein Vergleich setzt 
damit das Z-Flag, wenn beide Operanden den- 
selben Wert haben (die Subtraktion ergibt den 
Wert $00). 


® Den Befehl BIT: abgesehen von einer direk- 
ten Kopie der beiden höchstwertigen Bits des 
adressierten Operanden in die Flags N und V 
führt dieser Befehl ein bitweises AND zusam- 
men mit dem Inhalt des Akkus aus und setzt mit 
dem Resultat das Z-Flag. Folge: Wenn der Akku 
den Inhalt $00 (oder $0000) hat, ergibt ein BIT- 
Befehl immer ein gesetztes Z-Flag. Hat der 
Akku dagegen den Inhalt $FFFF (alle Bits ge- 
setzt), dann wird Z nur gesetzt, wenn der adres- 
sierte Operand den Wert $00 hat. 


Abgesehen von den Befehlen SEP #$02 und 
REP #$02 kennt der 65816 keine direkten Be- 
fehle zur Beeinflussung des Z-Flags. Die zu 
diesem Flag gehörenden bedingten Sprünge 
dürften wohl neben den Befehlen LDA und STA 
zu den am häufigsten benutzten gehören: BEQ 
(„Branch on EQual“) führt einen Sprung aus, 
wenn Z gesetzt ist und wird ansonsten ignoriert; 
BNE („Branch on Not Equal") wird nur bei 
gelöschtem Z-Flag ausgeführt. 


3.6.7. Das C-Flag („Carry“ = Übertrag) 


Das C-Flag wird zur Erkennung von Über- bzw. 
Unterlauf bei vorzeichenloser Arithmetik (vgl. V- 
Flag) sowie für Vergleiche und Schiebeopera- 
tionen verwendet. (Vorzeichenlose Arithmetik: 
Interpretation der Werte $00..$FF als positive 
Zahlen im Bereich von 0 bis 255, vgl. 3.6.1). 
Das Carry funktioniert quasi als neuntes (bzw. 
siebzehntes) Bit des Akkumulators, sein Verhal- 
ten ist bei allen Mitgliedern der 65er-Familie 
dasselbe (bis auf eine zusätzliche Funktion 
beim 65816, die in Abschnitt 4 beschrieben ist). 
Die folgenden Arten von Operationen beeinflus- 
sen den Zustand des Carry nicht: 

® Laden, Speichern und Transfer von Register- 
inhalten, wobei das Zurückholen des P-Regi- 
sters vom Stack natürlich eine Ausnahme dar- 
stellt; 

@ Erhöhung oder Erniedrigung von Speicher- 
stellen und Registern; 


® Bitweise logische Operationen (AND, ORA, 
EOR). 


Additionen und Subtraktionen benutzen das 
Carry als Erweiterung des Akkumulators. So 
ergibt z.B. die bereits in 3.6.6. gezeigte Be- 
fehlsfolge LDA #$90 / CLC / ADC #$70 das 
Ergebnis $100 — der Akku enthält danach den 
Wert $00, das Carry ist gesetzt. Eine Addition, 
deren Ergebnis die Breite des Akkus übersteigt, 
muß das Carry als Zwischenspeicher benutzen. 
Als Beispiel die Addition zweier 32-Bit-Zahlen: 


LDA $AB0PB ; SABBB/SABE1 

CLC 

ADC $BO6B ; $BOBH/$BRHL 

STA $C999 ; > $CDAB/ECHBL 
LDA $A902 ; $ABB2/$ABD3 

ADC $B982 : $BßB2/$BB95 

STA $C092 , -> $C002/$0983 
BCS FEHLER ‚ größer $FFFFFFFF! 


Vor der ersten Addition muß das Carry gelöscht 
werden (der 65816 kennt keinen Befehl wie 
„ADD"). Ergibt sich bei dieser Operation ein 
Überlauf, dann wird das Carry gesetzt: Zur 
nächsten Addition wird automatisch der Wert 1 
hinzuaddiert. (Eine Befehlsfolge wie LDA #$10 
/ SEC / ADC #$20 ergibt also den Wert $31 — 
und nicht $30.) Wenn sich durch die mit gesetz- 
tem Carry ausgeführte Addition nicht ein weite- 
rer Überlauf ergibt, ist das Carry am Ende der 
gesamten Operation gelöscht. 


Analoges gilt für Subtraktionen — nur daß das 
Carry in diesem Fall als „borrow“ (= „geborgt“) 
verwendet wird. Subtraktionen werden eben- 
falls grundsätzlich unter Berücksichtigung des 
Carry ausgeführt, ein Befehl wie „SUB“ ist nicht 
implementiert. Ein gesetztes Carry vor einer 
Subtraktion bedeutet: „nichts geborgt“, bei ei- 
nem gelöschten Carry wird dagegen zusätzlich 
der Wert 1 abgezogen. Ein Beispiel im 8-Bit- 
Modus: 


LDA #829 : Akku <- $29 

SEC ; kein "borrow" 

SBC #$21 ; Akku: $FF 

LDA #$19 ; höherwertiger Teil 

SBC #$98 ; ergibt $%7 (nicht $ß8} 


Durch den Unterlauf nach der ersten Subtrak- 
tion ist das Carry gelöscht worden, die zweite 
Subtraktion ergibt deshalb automatisch ein um 
eins erniedrigtes Ergebnis. Da in unserem Bei- 
spiel in der zweiten Subtraktion kein weiterer 
Unterlauf auftritt, ist das Carry am Ende der 
gesamten Operation wieder gesetzt. 


Wie bereits des Öfteren erwähnt, wird ein Ver- 
gleich zweier Operanden („Compare“) über ei- 
ne interne Subtraktion ausgeführt. Neben den 
Flags Z und N wird dadurch auch das Carry 
beeinflußt: Vor der Ausführung des „Com- 
pare”-Befehls wird es (implizit) gesetzt, danach 
wird der adressierte Operand (ebenfalls intern) 
von dem entsprechenden Register abgezogen. 
Das Carry wird dem Ergebnis entsprechend 
gesetzt. Beispiel: 


LDA #+$6# 
CMP $ABPB 


; Akku <- $6ß 


Abhängig vom Inhalt der Speicherstelle $AO00 
ergeben sich drei Möglichkeiten für die Werte 
der Flags ©, Z und N: 
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Wenn Sie die Leistungsfähigkeit ihres 
Apple Ilc bisher noch nicht ausschöp- 


fen konnten, brauchen Sie dieses Buch. 


Leicht verständlich, trotzdem ausführ- 
lich wird die Sprache Applesoft BASIC 
dargestellt. Eine Vielzahl von Program- 
men, die speziell auf den Apple IIc zu- 
geschnitten wurden, zeigen die Wir- 
kung der einzelnen Befehle bis zu Pro- 
grammiertechniken für Diskettenzugriff, 
Maus und andere Anwendungen, Apple 
IIc Maschinensprache, Programmein- 
gabe und -kontrolle mit Monitorbefeh- 
len in PASCAL und FORTH geben dem 
Leser eine Basis für die Programmie- 
rung des Apple Ilc in anderen Spra- 
chen. 







Die Konfigurierung der seriellen Ports 
und weitere spezifische Beschreibun- 
gen des Computers ermöglichen die 
gezielte Kontrolle über die Maschine. 


Mehr als 90 PEEK-, POKE-und 
Maschinenprogrammadressen, Spei- 
cheraufteilung und weitere Tabellen 
sind für den Programmierer eine kon- 
zentrierte, wichtige Grundlage. 
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— $A000 enthält einen Wert, der größer als der 
Inhalt des Akkus (d.h. größer als $60) ist: Die 
intern ausgeführte Subtraktion ergibt damit ei- 
nen Unterlauf: C ist gelöscht, N ist gesetzt. Da 
das Ergebnis nicht $00 ist, wird Z ebenfalls 
gelöscht; 

— $A000 enthält den Wert $60: Die Subtraktion 
ergibt keinen Unterlauf, C ist nach der Opera- 
tion gesetzt, N ist gelöscht. Da das interne 
Ergebnis den Wert $00 hat, ist das Z-Flag ge- 
setzt; 

— $A000 enthält einen Wert, der kleiner als der 
Inhalt des Akkus ist: Die interne Subtraktion 
ergibt einen positiven Wert, C ist gesetzt, N und 
Z sind gelöscht. 


Für Schiebe- und Rotationsbefehle wird das 
Carry ebenfalls als zusätzliches Bit verwendet - 
und zwar sowohl bei Operationen mit dem Akku 
als auch bei Operationen mit Speicherstellen. 
Bild 5 gibt eine grafische Darstellung der An- 
wendung aller vier möglichen Befehle mit der 
Speicheradresse $A000 als Operand, wobei 
von einem gelöschten M-Flag ausgegangen 
wird. Wenn M gesetzt ist, finden alle gezeigten 
Operationen ausschließlich mit der Speicher- 
stelle $A000 statt, der Inhalt von $A001 bleibt 
unberührt. 

Ob ein Schiebebefehl auf ein oder zwei Byte 
angewendet wird, ist allein durch die Breite des 
Akkus festgelegt — die Breite der Indexregister 
spielt in diesem Zusammenhang keine Rolle. 


Das Carry kann mit dem Befehl SEC (ersatzwei- 
se SEP #$01) explizit gesetzt und mit CLC 
(oder REP #$01) explizit gelöscht werden. Der 
bedingte Sprungbefehl BCS („Branch on Carry 
Set”) wird nur ausgeführt, wenn das Carry ge- 
setzt ist, und ansonsten ignoriert; der Befehl 
BCC („Branch on Carry Clear“) bewirkt nur bei 
gelöschtem Carry eine Verzweigung. 


4. Umschaltungen und Probleme 


Dem aufmerksamen Leser dürfte aufgefallen 
sein, daß in den vorhergehenden Abschnitten 
des öfteren die Rede von der Umschaltung 
zwischen „Emulation Mode“ und „Native Mo- 
de“ war — nur das „Wie“ ist nach wie vor 
ungeklärt. Der Grund: Das zur Umschaltung 
gehörige Flag „E" ist beim 65816 als neuntes 
Bit des P-Registers definiert und nur über einen 
speziellen Befehl erreichbar. Die Umschaltung 
von „Emulation“ auf „Native“ geschieht über 
die folgende Befehlssequenz: 


GLC löscht barıy 
XCH ;‚ Tausch E - GC, löscht E 


Nach Ausführung dieser Befehle enthält das 
Carry den vorherigen Stand von E - wenn es 
gesetzt ist, war der Prozessor vorher im „Emu- 
lation Mode"; ist es gelöscht, hat sich der Pro- 
zessor bereits in seinem „Urzustand“ be- 
funden. 

Die Umschaltung von „Native“ auf „Emulation“ 
geschieht auf ähnliche Weise: 


SEC ‚ setzt Carry 


XCE ; Tausch E-C, setzt E 


Der Befehl XCE stellt die einzige Möglichkeit 
dar, an den Siand des E-Flags heranzukom- 
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Bild 5: Schiebe- und Rotierbefehle 


men. Durch den Tausch mit dem Carry läßt sich 
allerdings ein Problem recht elegant lösen, das 
ansonsten viel Kopfzerbrechen bereiten würde 
— nämlich Unterprogramme, die in einem be- 
stimmten Zustand „gefahren“ werden müssen. 
Ein Beispiel dazu: Die /O-Routinen des Ilgs 
arbeiten intern grundsätzlich im „Native Mode“. 
Damit sie sowohl von 16- als auch von 8-Bit- 
Programmen benutzt werden können, wird der 
„Aufrufzustand“ des Prozessors zwischenge- 
speichert: 


CLC ‚ Carry löschen 

XCE ‚ löscht E 

PHIF ; P auf den Stack 

REP #$3ß ; M=ß, X=ß: 16 Bit A,X,Y 
JSR 5 ; Eingabe/Ausgabe 

PLP ; P vom Stack 

AÄCE ; Carry -> E-Flag 

CLC 

RTS 


Der erste XCE-Befehl setzt den „Native Mode", 
der vorherige Stand von E wird dabei im Carry 
festgehalten. Das darauffolgende PHP bringt 
das P-Register (also auch das Carry-Flag) auf 
den Stack. Nach Ausführung der Routine wird 
das P-Register wieder vom Stack geholt, wobei 
der ursprüngliche Zustand der Flags M und X 
automatisch wiederhergestellt wird. Der zweite 
XCE-Befehl tauscht Carry und E miteinander 
aus und stellt so den vorherigen Zustand von E 
wieder her. 


4.1. Umschaltmöglichkeiten 


Aus dem Stand des Carry und dem Stand von E 
vor einem XCE-Befehl lassen sich insgesamt 
vier verschiedene Möglichkeiten (,„Permutatio- 
nen") ableiten: 


— C ist gesetzt, E ist gesetzt. Der Prozessor 
befindet sich vor dem Austauschbefehl im 
„Emulation Mode“ und bleibt es danach eben- 
falls. Der XCE-Befehl hat in diesem Fall nicht die 
geringste Wirkung. 

— C ist gelöscht, E ebenfalls. Der Prozessor 
befindet sich vor dem Austauschbefehl im „Na- 
tive Mode“ und bleibt es danach ebenfalls. Der 


XCE-Befehl bleibt auch hier ohne jede sichtbare 
Wirkung. 

Die anderen beiden Möglichkeiten (4.1.1. und 
4.1.2.) sind leider nicht ganz so einfach: 


4.1.1. Von „Emulation Mode“ auf 
„Native Mode“ 


Diese Umschaltung hat folgende Wirkungen: 

@® Die Flags M und X werden entsperrt. Mit 
einem folgenden REP-Befehl können der Akku 
und/oder die Indexregister auf 16 Bit Breite 
umgeschaltet werden. Achtung: Das Löschen 
des E-Flags selbst bewirkt keine Veränderung 
der Registerbreite! 

@® Das höherwertige Byte des Stackpointers 
wird entsperrt. SP kann mit einem folgenden 
Befehl auf einen anderen Bereich als 
$0100..$01FF gesetzt werden. Die Löschung 
des E-Flags selbst hat keinen Einfluß auf den 
Inhalt von SP. 

@ Der Prozessor greift von nun an für IRQ, BRK 
und andere Unterbrechungsanforderungen auf 
andere Vektoren zu (s. Abschnitt 5). 

Wo bleiben die Register PB, DB und D? Der 
nächste Absatz hat dafür eine verblüffende Ant- 
wort parat. 


4.1.2. Von „Native Mode“ auf 
„Emulation Mode“ 


Diese Umschaltung hat folgende Wirkungen: 


@® Die Flags M und X werden auf den Wert „1" 
gesetzt und gesperrt, Akku und Indexregister 
sind dadurch auf 8 Bit Breite festgelegt. Folgen- 
de REP-Befehle für diese beiden Bits bleiben 
ohne Wirkung. 

© Das höherwertige Byte des Stackpointers 
(„SH“) wird auf den Wert $01 gesetzt und 
gesperrt, der Stack somit auf den Bereich 
$0100..$01FF festgelegt. Der vorherige Inhalt 
von SH geht verloren. 

® Der Prozessor greift von nun an für IRQ-, 
BRK- und andere Unterbrechungsanforderun- 
gen auf die Vektoradressen des 6502 zu (s. 
Abschnitt 5). 
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Apple Assembler 


von Ulrich Stiehl 
1984, 200 S., 3 Abb,, kart., 
DM 34,— 

ISBN 3-7785-1047-9 


Begleitdiskette DM 28, — 
ISBN 3-7785-1048-7 


























„Apple Assembler“ wendet sich an 
alle, die bereits Anfängerkenntnis- 
se der 6502-Programmierung ha- 
ben - z. B. aufgrund des Buches 
„Apple-Assembler lernen“ - und 
nunmehr ein Nachschlagewerk für 
ihren Apple Il Plus/lie/lIc suchen, 
in dem alle wichtigen ROM- 
Routinen sowie eine Vielzahl son- 
stiger Hilfsprogramme in einer sy- 
stematischen Form zusammenge- 
stellt werden, Insgesamt umfaßt 
dieses Buch über 40 Utilities, dar- 
unter mehrere völlig neuartige 
Programme wie Double-Lores, 
Double Hires, Screen-Format u.a. 


Der erste Teil enthält ein Repetito- 
rum der wichtigsten Befehle, 
Adressierungsarten und sonstigen 
Besonderheiten des 6502. 


Im zweiten Teil werden alle Adres- 
sen des Monitors zusammen- 
gestellt, die für Assembler-Pro- 
grammierer von Nutzen sein kön- 
nen. Darüber hinaus findet der 
Leser Unterroutinen für hexadezi- 
male Addition/Subtraktion/Multi- 
plikation/Division, Binär-Hex- 
ASCII-Umwandlung usw. 

Der dritte Teil befaßt sich mit der 
Speicherverwaltung der Language 
Card und der lle-64K-Karte und 
enthält Move-Programme zum 
Verschieben von Daten in die und 
aus der Language Card sowie der 
64K-Karte. 


Der vierte Teil ist dem Applesoft- 
ROM gewidmet und listet eine 
große Anzahl nützlicher Interpre- 
ter-Adressen. Bei den Utility- 
Programmen liegt das Schwerge- 
wicht auf Fließkommamathematik 
und Print Using. 


Der letzte Teil behandelt den Text- 
und Graphikspeicher. Neben einem 
professionellen Maskengenerator- 
programm werden auch Routinen 
zur Double-Lores und Double- 
Hires-Grafik vorgestellt. 
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Apple-Assembler 
lernen 


Band 1: Einführung in die 
Assembler-Programmierung 
des 6502/65C02 


von Jürgen Kehrel 
1985, 234 S,, kart., DM 38,— 
ISBN 3-7785-1151-3 


Begleitdiskette: DM 44,— 
ISBN 3-7785-1243-9 


Das zweibändige Werk „Apple As- 
sembler lernen“ ist ein kompletter 
Kurs in der Assemblerprogram- 
mierung des 6502 und des 65C02 
auf dem Apple Il, der nicht da auf- 
hört, wo andere Einführungen auf 
„weiterführende Literatur“ verwei- 
sen. 


Starkes Gewicht wird auf die prak- 
tische Anwendung gelegt. Deshalb 
gehört zum Kurs ein vollwertiger 2- 
Pass Assembler, der als einer von 
wenigen die erweiterten Befehle 
der neuen Ilc und Ile Prozessoren 
65C02 verarbeitet und der auch 
lange Programme von mehr als 
1000 Zeilen in wenigen Sekunden 
übersetzt. Ein interaktiver Debug- 
ger und Simulator hilft Ihnen, eige- 
ne und fremde Maschinenpro- 
gramme zu verstehen. Mit seinen 
vielfältigen und mächtigen Mög- 
lichkeiten läßt er Sie hinter die Ku- 
lissen Ihres Rechners schauen. Sie 
können „sehen“, was abläuft, Ihre 
Vorstellungskraft wird angeregt 
und nicht nur einfach Ihr Gedächt- 
nis strapaziert, 


In 35 überschaubaren Lektionen 
lernt der Leser sämtliche Maschi- 
nenbefehle des Apple und die 
wichtigen Grundalgorithmen., 


Apple-Assembler 
lernen 


Band 2: Nutzung besonderer 
Apple-Eigenschaften 


von Jürgen Kehrel 
1986, 281 S,, kart, DM 38,— 
ISBN 3-7785-1170-X 


Begleitdiskette: DM 44,— 
ISBN 3-7785-1244-7 


Der zweite Band stellt Programme 
und Unterroutinen vor, um fast alle 
grundlegenden Probleme auf dem 
Apple in Maschinensprache zu 
lösen: Dazu gehören Ein- und 
Ausgabeoperationen wie z. B. for- 
matierte Bildschirmausgabe in 40 
und 80 Z/Z., Lores- und Hires- 
Grafik, Hires-Schrift durch  Bit- 
Grafik, Hires-Fenster incl. Fen- 
sterscroll, Ansprache von Disket- 
tenlaufwerken entweder unter DOS 
und ProDOS oder auch ganz direkt 
Nibble für Nibble am Beispiel eines 
schnellen Kopierprogramms, das 
in einem Durchgang formatiert und 
Daten schreibt. 


Zugriffe auf die Stringverwaltung 
und die Fließkommaarithmetik von 
Applesoft werden ebenso beharn- 
delt wie elegante Musik- und Ton- 
effekte. Dabei wird ausgiebig von 
ROM-Routinen Gebrauch gemacht, 
die jeweils im Zusammenhang er- 
klärt werden, Sie lernen viel über 
das Innenleben Ihres Apple und 
wie Sie BASIC-Programme mit Ma- 
schinensprache verbessern kön- 
nen. 
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Apple-CP/M: 
Assembler- 
Programmierung 


für Einsteiger, Fortgeschrittene 
und 6502-Kenner 


von Heinrich Kersten 
1986, 246 S, DM 48,— 
ISBN 3-7785-1379-6 


Begleitdiskette: DM 44, — 
ISBN 3-7785-1380-X 


Das Buch beschreibt die Assem- 
bler-Programmierung im Rahmen 
des CP/M-Betriebssystems. Es 
wurde vorrangig für die Besitzer 
von Apple Il-Geräten konzipiert. 
Der überwiegende Teil des Buches 
ist aber geräteunabhängig und 
somit auch für die Benutzer ande- 
rer GP/M-tüchtiger Fabrikate (mit 
8080/Z80-Prozessor) von Interes- 
se. 


Einsteiger erhalten im ersten Ab- 
schnitt einen Intensiv-Kurs (auch in 
der DDT-Anwendung). Für Kenner 
der 6502-Programmierung werden 
viele Querverweise vorgestellt. Der 
Z80-Befehlsvorrat wird im Detail 
erläutert. Es folgen wichtige Basis- 
programme (Konvertierungen, 
Binär- und BCD-Arithmetik), um- 
fassende Diskussionen der De- 
bugger, Assembler und Linker 
sowie des CP/M-Betriebssystems 
(Speicherverwaltung, BDOS und 
BIOS-Aufrufe, Bildschirmfunktio- 


nen). Den Abschluß bilden lauffä- 
hige Beispielprogramme und Utili- 
ties und ein umfangreicher Tabel- 
len-Anhang. 
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© Die höherwertigen Bytes der Indexregister X 
und Y werden auf den Wert $00 gesetzt und 
gesperrt, ihr vorheriger Inhalt geht verloren, das 
höherwertige Byte des Akkus bleibt dagegen 
unverändert. 


Die Register PB (Programmbank), DB 
(Datenbank) und D (Direct Page) bleiben nach 
wie vor akliv. 

Damit ein für den 65(C)02 geschriebenes Pro- 
gramm korrekt abläuft, müssen diese Register 
allesamt vor der Umschaltung auf den Wert $00 
(bzw. $0000) gesetzt werden. 

Um es genau zu nehmen: Dieses Setzen kann 
auch nach der Umschaltung erfolgen — auch im 
„Emulation Mode“ stehen sämtliche Befehle 
des 65816 weiterhin zur Verfügung. Die Aus- 
nahmen sind: 


— Ein Löschen der Flags M und X ist nicht 
möglich, ein Befehl wie REP #$30 bleibt ohne 
Wirkung. 

— Ein Versetzen des Stacks auf einen anderen 
Bereich als $0100..$01FF ist nicht möglich, der 
höherwertige Teil von SP bleibt immer auf dem 
Wert $01. 

— Indizierte Adressierungen der Seite O spre- 
chen immer den durch das D-Register festge- 
legten Bereich an, bleiben also auf eine Spei- 
cherseite beschränkt (vgl. 3.3). Dasselbe gilt für 
indizierte Adressierungen über den Stack- 
pointer. 


Das große Problem bei einer Umschaltung in 
dieser Richtung besteht im „rücksichtslosen” 
Setzen von SP. Ein Unterprogramm wie das 
folgende führt mit absoluter Sicherheit zu einem 
Systemabsturz, wenn der Stackpointer zum 
Zeitpunkt des Aufrufs auf einen anderen Wert 
als $01xx gesetzt ist: 


SEC ; => bmulation Mode: SP 


XCE ‚ wird auf $ßlxx gesetzt 
= > 

> 

GLC ; zurück auf "Native": 
XCE : SP bleibt auf $Pßlxx! 
RS ; -> Absturz 


Um diesen Absturz zu verhindern, muß der 
Stand von SP vor der Umschaltung zwischen- 
gespeichert und hinterher wieder zurückgela- 
den werden, Eine Umschaltung von 16 auf 8 
Bits muß also zumindest die folgenden Elemen- 
te enthalten: 


Tal ; Akku <- Stackpointer 
STA XxXxxX ; Stackpointer retten 
LDA #$ß1LFF 

TCS : Stack auf $PLFF 

SEC 

XCE ,; "Emulation Mode" 
PHP ;‚ auf $Ö1LFF-Stack 
asia? 

en 

PLP ; vom $ÄÖIFF-Stack 
XCE ; > "Native Mode! 
STA yyyy ; Funktionsergebnis 
LDA xxxx ‚ 16-Bit-Stack wieder 
TCS ; Zürlek in SP 

RES : via 16-Bit-Stack 


Dieses Programmfragment ist in mehrfacher 
Hinsicht unvollständig — es zerstört den mo- 
mentanen Inhalt des Akkus sowie die höher- 
wertigen Hälften der Indexregister und läßt au- 
ßRerdem DB, PB und D völlig unberücksichtigt. 
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Der Apple IIgs kann mit fast sämtlichen Zusatz- 
karten betrieben werden, die auch in einem Ile 
funktionieren. Da die „Firmware“ dieser Zu- 
satzkarten für den 65(C)O2 geschrieben ist, fin- 
det vorher eine recht aufwendige Umschaltung 
statt, die sämtliche der hier fehlenden Elemente 
enthält. Apple, Inc. hat zu diesem Zweck ein 
festes „Protokoll“ definiert, dessen genaue Ab- 
folge allerdings zum gegenwärtigen Zeitpunkt 
noch nicht endgültig feststeht. Wir werden es 
deshalb in einer späteren Ausgabe des Peeker 
beschreiben. 


4.2. Register unterschiedlicher Breite 


Bei einem Befehl wie „LDA <Speicheradres- 
se>" ist die Sachlage klar: Je nachdem, ob der 
Akku auf 8 oder auf 16 Bit Breite gesetzt ist, 
werden eine bzw. zwei Speicherstellen ange- 
sprochen. Analoges gilt für Transfers zwischen 
den Indexregistern und Speicheradressen — 
hier ist die Anzahl der angesprochenen Spei- 
cherstellen vom Stand des X-Flags abhängig. 
Etwas schwieriger wird es mit der Wortbreite 
schon, wenn es sich um Speicheroperationen 
ohne direkte Beteiligung der Register handelt, 
d.h. Befehle wie RÖR oder STZ. Die Entwickler 
des 65816 haben sich hier ebenfalls an der 
Breite des Akkus orientiert: Wenn der Akku auf 
16 Bits gesetzt ist, arbeiten Schiebebefehle und 
Rotationen mit zwei aufeinanderfolgenden 
Speicheradressen, der Befehl STZ setzt zwei 
aufeinanderfolgende Speicherstellen auf den 
Wert $00. Hat der Akku eine Breite von 8 Bits, 
dann wird jeweils nur mit einem Byte bzw. einer 
Speicheradresse gearbeitet. 

Was passiert, wenn z.B. der Akku auf 8, die 
Indexregister auf 16 Bits gesetzt sind und der 
Befehl 


TARA ‚ Inhalt von X -> Akku 


gegeben wird? Per Konvention ist festgelegt, 
daß sich bei Transfers, die von einem zu einem 
anderen Register stattfinden, die Anzahl der 
Bytes immer nach der Breite des Zielregisters 
richtet. Ein Beispiel: 


REP #$38 ; Akku, X und Y: 16 Bits 
LDA #$2167 ; Akku <- $2167 

SEP #$20 ; Akku auf 8 Bits 

LDX #$A232 ; X-Register <- $A232 


TXA ; Inhalt von X —> Akku 
REP #$29 ; Akku auf 16 Bits 


Der Akku enthält nach diesen Operationen den 
Wert $2132 — der Befehl TXA hat nur das nie- 
derwertige Byte verändert. In die umgekehrte 
Richtung funktioniert das allerdings nicht: 


REP #$39 ; Akku, X und Y: 16 Bits 
LDX #$2167 ; X-Register <- $2167 
SEP z$1® ; X und Y auf 8 Bits 

LDA #$A232 ; Akku <- $A232 


TAX ;‚ Inhalt vom Akku -> X 
REP #$19 ; X, Y wieder auf 16 Bits 


Das X-Register enthält nach diesen Operatio- 
nen den Wert $0032, weil der Befehl SEP #$10 
seinen höherwertigen Teil gelöscht hat. 


Neben dem Datentransfer zwischen dem Akku 
und den Indexregistern sind drei weitere Regi- 
ster-zu-Register-Operationen möglich: 

1) Akku > Stackpointer („TCS") und Stack- 
pointer > Akku („TSC“): Wie durch das „C* 
angedeutet, ignoriert dieser Befehl die momen- 


tan gesetzte Breite des Akkus, es werden im- 
mer 16 Bits Übertragen. 

2) Akku — Direct-Register („TCD“) und Direct- 
Register — Akku („TDC"): Hier gilt dasselbe, 
die gesetzte Breite des Akkus wird ignoriert. 

3) X-Register — Stackpointer („TXS") und 
Stackpointer — X-Register („TSX“): Diesen 
Befehl hätten die Entwickler des 65816 wohl am 
liebsten wieder gestrichen - leider ist er beim 
65(C)02 die einzige Möglichkeit, mit dem Stand 
von SP zu arbeiten. Wenn das X-Register auf 8 
Bit Breite gesetzt ist, dann hat sein höherwerii- 
ger Teil immer den Wert $00, der Befehl TSX 
liefert in diesem Fall also nur den niederwerii- 
gen Teil von SP. Ein Transfer in die umgekehrte 
Richtung hat ein (meist) katastrophales Ergeb- 
nis: Da der Stackpointer im „Native Mode“ 
immer 16 Bit breit ist, wird er durch den Befehl 
TSX auf den Wert $00xx gesetzt. Dieses Verhal- 
ten ist der einzige Grund, warum ein für den 
65(C)02 geschriebenes Programm im „Native 
Mode” auch dann nicht funktionieren kann, 
wenn A, X und Y auf 8 Bit Breite gesetzt sind. 
Die häufig verwendete Befehlsfolge 


LDX #$FF ; X-Register <- $FF 
TXS ‚ Inhalt von X -> SP 


sollte eigentlich den Stackpointer auf die höch- 
ste Position (d.h. auf $OIFF) setzen — im „Nati- 
ve Mode“ kommt dabei der Wert $OOFF heraus. 


5, Reset, BRK, IRQ, NMi usw. 


Die Prozessoren der 65er-Familie reagieren auf 
eine Unterbrechungsanforderung folgender- 
maßen: 

— Speichern des PC (bzw. BP/PC) und des P- 
Registers auf dem Stack (außer bei Reset); 

— Lesen von zwei Bytes aus dem Speicherbe- 
reich ($00/)FFFx; 

— Einsetzen der gelesenen Werte in den PC. 


Ein Beispiel: Wenn die Speicheradressen 
SFFFC/D die Werte $62 $FA enthalten, dann 
bewirkt ein Reset-Impuls einen Sprung zur 
Adresse $FA62 - von dieser Adresse liest der 
Prozessor den nächsten Befehl. 

Aus diesem Verhalten ergibt sich eine grund- 
sätzliche Forderung an den elektronischen Auf- 
bau einer 65xx-Maschine: Der Bereich ($00/) 
FFFx muß zumindest beim Start durch ein ROM 
besetzt sein. Ältere „Apple-Hasen" werden 
sich noch mit Schrecken an die Folgen eines 
Reset bei aktivierter „Language Card“ (und un- 
definierten Reset-Vektoren) erinnern. 

Der 65(C)02 kennt nur drei verschiedene Vek- 
toren, der 65816 dagegen sechs (eigentlich 
sind es sogar neun). Die Vektoren des 65816 
werden ebenfalls aus der Speicherbank 00 ge- 
lesen, sämtliche Behandlungsroutinen müssen 
zumindest in der Bank 00 beginnen. Fangen wir 
mit dem wichtigsten an: 


5.1. Reset 


Sowohl der 65(C)02 als auch der 658xx lesen 
nach einem Reset-Impuls die Speicheradres- 
sen $(00/)FFFC/D als Vektor und setzen den 
gelesenen Wert in den PC ein. Die einzige 
zusätzliche Operation, die der 65(C)02 bei ei- 
nem Reset ausführt, ist ein SEI, also das Sper- 
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ren von IRQ-Anforderungen. Alle anderen Flags 
(inklusive dem D-Bit) bleiben unverändert, eine 
Speicherung von P und FC auf dem Stack findet 
nicht statt. 


Der 658xx führt bei einem Reset eine ganze 
Reihe zusätzlicher Schritte aus: 
@® durch Setzen des E-Bits wird auf „Emulation 
Mode“ umgeschaltet. Folge: Die Bits M und X 
werden ebenfalls gesetzt, die höherwertigen 
Bytes von X- und Y-Registern erhalten den Wert 
$00, der höherwertige Teil des Stackpointers 
den Wert $01. Die niederwertigen Teile von SP, 
X und Y sowie der gesamte Inhalt des Akkus 
(AH und AL) bleiben dagegen unverändert. 

@ Im P-Register wird das D-Bit gelöscht, IRQ- 
Anforderungen werden (wie beim 65(C)02) ge- 
sperrt. Die Flags N, V, Zund © bleiben unverän- 
dert bzw. undefiniert. 

® Das Direct-Register (D) erhält den Wert 
$0000. 

® Programm- und Datenbankregister (PB und 
DB) werden auf $00 gesetzt. 


So kompliziert es damit wird, ein 65816-Pro- 
gramm „resetfest“ zu machen — wenn diese 
Schritte nicht ausgeführt würden, könnte ein 
65802 in einer 65(C)02-Maschine wie dem Ile 
nicht funktionieren. (Die Reset-Routine im Mo- 
nitorprogramm des !le enthält selbstverständ- 
lich keine Befehle, die „Emulation Mode“ set- 
zen oder dafür sorgen, daß auch wirklich der 
Speicherbereich $0000..$00FF als „Seite 0“ 
benuizt wird.) 


5.2. BRK und IRQ 


Ein Hardware-Interrupt wird durch ein Signal am 
IRQ-Eingang des Prozessors erzeugt und hat 
nur dann eine Wirkung, wenn das |-Flag („IRQ- 
Sperrbit“) im P-Register gelöscht ist. 

Auf den Befehl BRK reagiert der Prozessor mit 
einem Software-Interrupt. Diese Unterbrechung 
kann nicht durch ein gesetztes IRQ-Sperrbit 
maskiert werden, sie wird Immer ausgeführt. 
Beide Arten von Interrupts haben bei einem 
65(C)02 oder einem 658xx im „Emulation Mo- 
de“ dieselbe Wirkung: 


— Der momentane Stand des PC (bei BRK: PC 
+ 2) wird auf den Stack gebracht, zuerst das 
höherwertige, dann das niederwertige Byte. 

— Das P-Register wird auf den Stack gebracht. 
Wenn die Unterbrechung durch einen IRQ er- 
folgte, wird anstelle des Bit 4 eine „O“ geschrie- 
ben, ansonsten eine „1". (Das Bit 4 des P- 
Registers ist beim 65(C)02 im „Normalbetrieb“ 
nicht definiert). 

— Weitere IRQs werden durch Setzen des |I- 
Flags gesperrt. 

— Sprung zu der Adresse, die von den Spei- 
cherstellen $(00/)FFFE/F gelesen wird. 


Achtung: Das Register PB wird auf den Wert 
$00 gesetzt. Ein Programm, das im „Emulation 
Mode“ außerhalb der Bank 00 läuft, darf also 
nicht durch einen IRQ oder BRK unterbrochen 
werden! 

Die Routine zur Behandlung von IRQ/BRK muß 
anhand des „gepushten“ P-Registers selbstän- 
dig zwischen IRQ und BRK unterscheiden, also: 


STA $xx ; Akku retten 
PLA ; P-Register! 
PHA ; wieder zurück 
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AND #$19 ;‚ Bit 4 gesetzt? 
BEG IRQSET ; -2odist IRO 
Su? ;‚ -> ist BRK 


Der Befehl RTI („Return from Interrupt“) holt 
(im Gegensatz zu einem RTS) sowohl den PC 
als auch das P-Register wieder vom Stack. 


Im „Native Mode“ verhält sich der 658xx etwas 
anders — eine Unterscheidung innerhalb der 
Behandlungsroutine zwischen IRQ und BRK ist 
nicht mehr nötig, weil zwei verschiedene Vekto- 
ren benutzt werden. 


— Ein BRK liest die Adressen $00/FFE6/7 als 
Vektor und hat ein Argument, ist also ein Zwei- 
Byte-Befehl („BRK $xx"). Das zweite Byte wird 
lediglich gelesen und hat keine weitere Funktion 
als das „Durchnumerieren“ gesetzter Unter- 
brechungspunkte. Solange bei der Program- 
mierung ausschließlich mit absoluten Adressen 
gearbeitet wird, erscheint diese Möglichkeit et- 
was arg luxuriös, schließlich kann man über die 
„Break-Adresse“ feststellen, an welcher Stelle 
des Programms der BRK stattgefunden hat. Ein 
System wie der Iigs bestimmt dagegen die 
Adreßlage eines Programms erst unmittelbar 
vor seinem Start - ohne die Möglichkeit nume- 
rierter Breakpoints wäre das „Debugging“ des- 
halb mehr als kompliziert. 

- ein IRQ liest dagegen die Adressen $00/ 
EREE/F. 


Der „Trick“ mit dem Bit 4 des P-Registers ist 
hier nicht mehr nötig — er wäre auch gar nicht 
mehr möglich, weil mit diesem Bit der momen- 
tane Stand des X-Flags festgehalten wird. Bit 5 
des gespeicherten P-Registers enthält das M- 
Flag. 

Zusätzlich zu PC und P wird das Programm- 
bank-Register auf dem Stack gespeichert, so 
daß sich die folgende Belegung des Stacks 
nach einem IRQ oder BRK ergibt: 


PB Programmbank-Register 

PC, höherwertiger Teil 

PC, niederwertiger Teil 
R Flags 

SP > 


x) s. Abschnitt 5.2.1 

Das PB-Register wird auf den Wert $00 gesetzt, 
die Behandlungsroutine muß also innerhalb der 
Bank 00 beginnen. 

Der Befehl RTI liest im „Native Mode" vier 
Bytes vom Stack (entspricht also im Prinzip der 
Befehlsfolge PLP/RTL) und stellt somit nicht nur 
die Register P und PC, sondern auch den vor- 
herigen Inhalt des Programmbank-Registers 
wieder her. 

An dieser Stelle sei noch eine Merkwürdigkeit 
erwähnt (vgl. 3.1.): Alle Prozessoren der 65er- 
Familie speichern bei einem JSR- bzw. JSL- 
Befehl eine Returnadresse auf dem Stack, de- 
ren Wert um eins zu niedrig ist. Dieser „Fehler“ 
wird dadurch korrigiert, daß ein RTS bzw. RTL 
den vom Stack zurückgelesenen Wert um eins 
erhöht, bevor er in den PC eingesetzt wird, 
Eigentlich wäre dieses Verhalten kein sonderli- 
ches Problem — wenn der Prozessor nicht bei 
einem IRQ die „richtige“ Adresse speichern 
würde: Der Befehl RTI nimmt folglich keine 
Erhöhung der Returnadresse vor. Eine Routine, 
die via IRQ aufgerufen wird, darf also nicht mit 
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einem RTS oder RTL enden - ansonsten über- 
springt der Prozessor ein Byte in dem Pro- 
gramm, das durch den IRQ unterbrochen 
wurde. 


5.3 NMI 


Diese Unterbrechung wird durch einen Impuls 
am NMI-Eingang des Prozessors ausgelöst, Sie 
ist nicht sperrbar („Non Maskable Interrupt") 
und läuft je nach Prozessortyp folgendermaßen 
ab: 

— 65(C)02 bzw. „Emulation Mode“: PC und P 
(unverändert) auf den Stack, Lesen der Spei- 
cheradressen ($00/)FFFA/B als Vektor und 
Sprung zur entsprechenden Adresse. Der Be- 
fehl RTI holt das P-Register sowie den PC wie- 
der vom Stack und setzt das unterbrochene 
Programm fort. 

— 658xx im „Native Mode“: PB/PC und P (in 
derselben Reihenfolge wie bei einem IRQ/BRK) 
auf den Stack, Lesen der Speicheradressen 
$00/FFEA/B und Sprung zur entsprechenden 
Adresse. Der Befehl RTI holt das P-Register 
sowie PB/PC wieder vom Stack und setzt das 
unterbrochene Programm fort. 

Das PB-Register des 658xx wird in beiden Fäl- 
len auf den Wert $00 gesetzt. Ein in „Emulation 
Mode“ laufendes Programm darf sich also nicht 
außerhalb der Bank 00 befinden - nach dem RTI 
geht es sonst in Bank 00 weiter. 


5.4. COP und ABORT 


Diese beiden Uhnterbrechungsmöglichkeiten 
sind nur bei den 658xx-Prozessoren definiert, 
sie sind sowohl im „Native Mode" als auch im 
„Emulation Mode“ verfügbar. Ein ABORT wird 
durch ein extern zugeführtes Signal ausgelöst 
und unterbricht den Prozessor mit sofortiger 
Wirkung. Hauptsächlicher Verwendungszweck: 
Unterbrechung bei elektronischen Fehlern (für 
68000-Fans: BERR-Signa)). 

Ein COP wird durch den Befehl COP („Copro- 
zessor") ausgelöst und hat ein Argument (COP 
+#$xx), entspricht also in etwa dem TRAP-Be- 
fehl des 68000, 

Beide Unterbrechungsmöglichkeiten sind nicht 
maskierbar und haben aus der Sicht des Pro- 
grammierers denselben Ablauf wie ein NMI: Im 
„Emulation Mode" werden PC und P-Resgister, 
im „Native Mode“ zusätzlich das PB-Register 
auf den Stack gebracht. COP liest die Adressen 
$00/FFE4/5 als Vektor, ABORT benutzt $00/ 
FFE8/9. Ein RTI im „Emulation Mode“ holt drei, 
ein RTl im „Native Mode“ dagegen vier Bytes 
vom Stack und setzt so das unterbrochene Pro- 
gramm fort. Auch hier gilt, daß sich ein im 
„Emulation Mode" laufendes Programm nicht 
außerhalb der Bank 00 befinden darf, weil sonst 
der Inhalt von PB verändert wird. 


Hinweis: 

Im Teil 2 dieses Kompaktkurses erläutert 
A. Schäpers die Adressierungsarten des 
65(C)02 (der 65816 kennt im „Emulation 
Mode” und im „Native Mode“ sämtliche 
Adressierungen des 65(C)02) und die 
Adressierungsarten, die der 65816 zusätz- 
lich erhalten hat. Stackoperationen und 
Blocktransfers werden ausführlich be- 
schrieben. 
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Apple Il europlus 

mehrere Laufwerke, 2FD-Control- 
ler, Z80, 80Z, 64K Ram, Metall- 
Gehäuse, gr. Tastatur und viel SW. 
Preis: DM 1.500,-. 

Telefon 07621/88168 


Softcard Ile (80Z., Z80 mit 
CP/M und 64K) DM 600,-; Extend- 
ed 80 Zeichen Karte mit 64K DM 
280,-; beides Originale; 

Tel. 02151 7/30 21 77 oder 0241 / 
367 74 Andreas Grün, 


Z80H, AP22, 8Mhz, komplett 
DM 380,-. Erphi Controller DM 
120,-. AE-RAMworks Ill IMB DM 
850,-. Tel. ab 18.30 h. 
Telefon 0250771490. 


Wir bieten Applied enginee- 
ring: Ramworks 512K Ile 800,-, 
Z-RAM 999,-, Ramfactor 512K Ile/ 
I+ 850,-, Transwarp 36 x 
schneller 825,—. Bitter Labortech- 
nik, Große Bleiche 27, 3050 Stein- 
hude, Tel. 05033/1522 


APPLE Il+; 2LW; Bernstein- 
Monitor; 802; RS232; Parallel- 
Schnittst., Druckerinterf., Arith.- 
Proz. 32Bit; Softw: Wordst. DBASE; 
TurboPascal; Assembler; ProDOS, 
u.v. mehr VB DM 1400,-. 

Telefon 07461/8672 


Verkaufe: Apple Ilic + 
2.LW+Imagew. + Bildsch. + 
Mouse+Appleworks + Software 
+Bücher+Peeker+Peekerdisk + 
Uhr Ilc DM 3975,-—. 
Tel. 0235/44490 


APPLE Ilc + Z-RAM 512K mit 
CP/M 4.0 + Monitor + Imagewri- 
ter + alle Betr, Syst. DOS/PRO- 
DOS + Textverar, + Pascal + 
Peeker + Sammeldisk. DM 3600, — 
Tel. 06887/1584 


Original Apple Interface 
IEEE488 mit Handb. DM 490,-. 
Tel. 05121/4669 


Apple lle-komp. neue ROMS, 
Z80 Maus 80Z + 64K, Drucker 
+Epson-Interface, 35-80 Track- 
LW-+Controller, Lüfter, Eprommer, 
Literatur Preis: VB 2900,-. 
Tel. 07332/6129 ab 17h 


Apple Il mit AT Look, 2 Lauf- 
werke Monitor bernstein sep. 
Tastatur Epson MX80 Drucker, 
Software, VB 2200,-. 

Tel. 09721/89477 nach 16 Uhr. 
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APPLE Ile, Alphakey, Ima- 
geWriter POLAROID PALETTE, 
Zubehör, preiswert. 

Telefon 07143/91836. 


APPLE Ilc kompl. mit APPLE. 
WORKS u.a Prog. 1900,-. 
BROTHER HR15 5m Kabel 900,-. 
Telefon 02003/767499. 


Apple lie, 128KB, N80e, 
2xDisk Il, Sanyo DM 8212, Ma- 
trixdrucker NEC, VB DM 2750,-. 
Tel. 02204/62862. 


Premium-Softcard Ile, Z-80 
6 MHZ DM 499,- komplett. 
Tel. 09252/1011 


Gewerbliche Anzeigen 


| sind mit El gekenn- 
zeichnet. 


Apple lic, mit Monitor, 2. 
Laufwerk, u. CP/M Card, sowie 
umfangr. Literatur u.v.a. zu verkau- 
fen. Preis VB. Tel. 089/4300985 





Pe 


APPLE BUSINESS GRA- 
PHICS + auf Wunsch Drucker- 
anpassung GEMINI STAR 10X 
DM 380,-. Tel. 06107/61325 


lle+c: CAD paint: exakte 
Zeichnungen m. Beschriftung (2 
Stärken), 40 Funktionen, 80 fertige 
Symbole für Wohnungspläne + 
elektr. Schalt, Info DM 2,—. Briefm., 
Disk: DM 99,- Scheck. Lohmann, 
M.-Müller-Ring 7, 6500 Mainz 


TURBO Pascal Turtlegrafik- 
Paket für Apple Il, kennt alle Be- 
fehle der UCSD-Unit, DM 89,- von 
Fa. Jochen Tucht, Rudolf-Albrecht- 
Straße 52, 3052 Bad Nenndorf. 


Apple Il: DFÜ-Kermit, Pascal 
satt, Public Domain in DOS u. 
CP/M. Je Volume DM 15,—. Bahn- 
hofssimulation, Sprachen (S.A.L.), 
Schulprogr. Gratisinfo: Fa. Wal- 
traud Muhle, Waldwinkel 3, 2105 
Seevetal 3 &@ 


* Disketten + 

*5 1/4”, 48 tpi, DM 0,99, 2D * 
#3 1/2", 135 tpi, DM3,19, 1DD x 
»auch andere, bes. Garantie * 
Allg. Austro-AG, Ringstraße 10 x 
*D-8057 Eching, T.08133/6116 #* 
Profi. CAD-Prog. CASCADE I 
für Apple Ile preisgünstig abzuge- 
ben. Preis VH, Tel. 04203/2160 
n. 18.00 Uhr. 


EEKER 


Börse 





Biete Software | 








Topsoftware für Appie Il: 
Sporttabellenverwaltung: nur 40,- 
PFS-Programme: 300,-, BALLbla- 
zer: 100,-, Superbase: 300,-—. Info 


(0,80 DM) bei: W. Rittmeyer, 
Wehrbruchweg 30, 4060 Viersen 1 


AppleWorks-Praktikum, 
Lern- und Nachschlagewerk, 
über 250 Seiten mit vielen Abbil- 
dungen 49,-; mit Diskette 65,-; 
Templates für Datenbank mit Dis- 
kette je 15,-; Hans-Jürgen Kühne, 
Neisserstr. 2, 3008 Garbsen 9 


KRRKKK KICK 

MAGNAT Das beste Apple- 
Pascal-Disk-Bear- 
beitungsprogramm! 
Disk+Manual: 34.90 
Info per 50 Pf-Rück- 
umschlag. 

Röhl, Hornerstr. 9, 2800 Bremen 


Finanzbuchhaltung,. Frei 
wählbarer Kontenrahmen, Sum- 
men- und Saldenliste, Journal, 
Kontoauszüge autom. UST-Verbu- 
chung ... DM 300,— (II+) BM-Soft- 
ware, Poetenweg 44, 4800 Biele- 
feld 1 


Neu! Kyan Includefile-Tool 
Il- sehr schnelle Hires-Routinen 
und Turtle-Grafik. 

DM 50,- (Schein/V-Scheck): Info 
gegen Rückporto bei: R. Winzen, 
Daimlerstr. 70, 4040 Neuss 1 





Gewerbliche Anzeigen 
sind mit El gekenn- 
zeichnet. 






MULTISCRIBE 180,-. 
CROWORKS 90,-, THINKTANK 
350,-, CHESSMASTER 2000 80,-. 
Alle Original. Teil. 02226/3008. 


MA- 


Suche Software 


ProDOS$S-Treiber für SATURN 
128K 

RAM-DISK J. Flacher, Kornweg 2, 
CH-8405 Winterthur, Tel. 01435 / 
4316 od. 052/282392 


Suche Privatliquidation 
Arztp. für Apple lle, 128 K 2. 
Laufw. Kopie oder Original. 

Tel. 05601/86747 


Fundgrube, Textbearbei- 
tung in Maschinenprogrammen 
38,—, Relocator 38,-, Einfügen- 
Entfernen von Programmteile 52,—, 
Copy-File für Erphi 78,—. Info ge- 
gen Freiumschlag: Manfred Herr- 
mann, Südwest Korso 11a, 1000 
Berlin 41 








APPLE REPARATUREN 
(auch compatible M-boards, z.B. 
Atlas, Arca, CES, Datastar, 
Dipa, Lasar, Mewa, 

PC-48 + 64, Plato, Radix, 0. 
ae.} sowie Zusatzkarten und 
Disk-Drives führt unser Speziali- 
stenteam mit mehr als 5-jähriger 
Kunden- und Reparatur-Dienst-Er- 
fahrung, garantiert zuverlässig und 
besonders kostengünstig aus. 
Bitte genaue Fehlerangabe sowie 
Tel. Nr. für evtl. Rückfragen nicht 
vergessen. 

Auf Wunsch Kostenvoranschlag. 
aaa-electronic gmbh 
Habsburgerstr. 134, 7800 Freiburg, 
Tel. 0761/2768864, Tx. 772642 aaad 


Microsoft Softcard Il, Z80B, 
CPM 2. Z8, Handbücher DM 700, —, 
Apple II Mouse Mousepaint DM 
350,-, NEC8023BN Matrixdrucker 
DM 700,-, Peeker 01/84-12/86 
gegen Gebot. T. 02204/62862 


Familienforschung mit Com- 
puter! Zeitschrift + Computerge- 
nealogie (3. Jg.) bietet Hilfe und 
schafft Kontakte. Pro Jahr 4 Hefte 
DM 12,-. K. Thomas, PF 1344, 
5778 Meschede 


Welche Lehrer (Gymnas.) 
sind amlausch von Unterrichts- 
material zu Biologie, Chemie, Phy- 
sik im AppleWorks-Format (oder 
AWriter) interessiert? Chiffre-Nr. 
P1009 


Suche Kontakt zu MS-Cobol 
80 Ugern und MS-Cobol 80 Pro- 
gramme im Source-Code. 

L. Elsenberg, Tel. 02837/8453. 


Verkaufe Peeker 1/85-12/86 


und BASIC/Manuals 1/2. 
T. 0511/466948 


Verkaufe Peeker 1/84-12/86 
+ Sammeldisk Nr. 1-19 + Turtle 
Graphics-Library + Softbreaker VB 
DM 250,-. Tel. 02633/96147 
nach 18 Uhr. 


Wer hilft? Wie können Textfiles 
schneller bearbeitet werden? — 
(Apple II+, 2x 128K-Saturn als 
Pseudo-Disk, Erphi-Contr. mit 2 x 
(2x 80 Track), Div-DOS oder evtl. 
gepachtes DOS?). 

Steffen Neugebauer, Schönwald- 
str. 19, 8721 Hesselbach. 
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Für Ihre Unterlagen 
Abonnement bestellt 


Ja, ich möchte Peeker abonnieren. 

Liefern Sie mir Peeker ab Ausgabe ............... zum Jahresbezugspreis 
von z.Zt. DM 75,— (Inland) inkl. MwSt. Die Lieferung erfolgt frei Haus. Porto, 
Verpackung und Zustellgebühren übernimmt der Verlag. Der Jahresbezugspreis 


für das Ausland beträgt z.Zt. DM 75,- plus DM 20,- Versandspesen. 
x 


Datum a= 4. Unterschrift 





am: 


Vertrauensgarantie: 

Ich habe davon Kenntnis genommen, 
daß ich die Bestellung schriftlich 
durch Mitteilung an den Dr. Alfred 
Hüthig Verlag GmbH, Postfach 
102869, 6900 Heidelberg innerhalb 
von 7 Tagen widerrufen kann. Zur 
Fristwahrung genügt die rechtzeitige 
Absendung des Widerrufs (Datum 
des Posistempels). 


Bitte lesen! 
Vertrauensgarantie: Ich habe davon Kenntnis genommen, daß ich die Bestellung schriftlich dureh Mitteilung an den 


Dr. Alfred Hüthig Verlag GmbH, Postfach 102869, 6900 Heidelberg innerhalb von 7 Tagen widerrufen kann. Zur 
Fristwahrung genügt die rechtzeitige Absendung des Widerrufs (Datum des Poststempels) 


Peeker 
Leserservice 


Postfach 102869 
6900 Heidelberg 


x 


Datum 2. Unterschrift 


Verlagshinwels: Das Abonnement verlängert sich zu den jeweils gültigen Bedingungen um ein Jahr, wenn es nicht 
2 Monate vor Jahresende schriftlich gekündigt wird, 


rd Abo-Karte 





Wir können nur Bestellungen.mit zwei Unterschriften bearbeiten. 


Für Ihre Unterlagen | | FE ke R 
Folgende Bücher bestellt: | 





Bitte senden Sie mir gegen Rechnung folgende Bücher: 


Postfach 102869 
6900 Heidelberg 1 


Datum Unterschrift 


vo 
En 721 Bühler, Applesoft-BASIC, [I Kehrel, Apple Assembler lernen, Bd. 2, 
O 3-7785-1094-0, DM 38,— 3-7785-1170-X, DM 38,— 
Ä 2) Eggerich, dBase Il, Bd. 1, L] Schäpers, ProDOS Analyse, 
Ns 3-7785-1147-5, DM 39,80 3-7785-1134-3, DM 68,— 
2] Eggerich, dBase Il, Bd. 2, [| Schäpers, Bewegte Apple-Graphik, 
[I 3-7785-0987-X, DM 39,80 3-7785-1150-5, DM 58,— 
L] Eggerich, dBase Il, Bd. 3, [1] Stiehl, Apple DOS 3.3, 
o 3-7785-0988-8, DM 39,80 3-7785-1297-8, DM 28,- 
U] Gabriel, Applewriter, U) Stiehl, Apple ProDOS, Bad. 1, 
En 6) 3-7785-1234-X, DM 35, 3-7785-1098-3, DM 28,— 
j >’ [I Hagenmüller, Microsoft-BASIC, Bd. 1, U Stiehl, Apple ProDOS, Bd. 2, 
bei: 3-7785-1038-X, DM 38,- 3-7785-1036-3, DM 30,- 
.. OD) Juhnke/Redlin, Apple Pascal, Bd. 1, D Stiehl, Apple Assembler, 
3-7785-1246-3, DM 42,— 3-7785-1047-9, DM 34,- 
Peeker [] Kehrel, Apple Assembler lernen, Bd. 1, [] Wassermann, Apple Ilc Handbuch, 
3-7785-1151-3, DM 38,— 3-7785-1157-2, DM 35,— 
Versandbuchhandlung z 





Für Ihre Unterlagen 


Folgende Disketten 
und Programme bestellt: 


DEEKER 44 





) Bitte senden Sie mir gegen Rechnung folgende Disketten: 
T [I Peeker-Sammeldiskette, einzeln [| ProDOS-Editor 1.0, Programm, DM 98,— 
oO Disk#______,Disk# [| MMU 2.0, Programm, DM 98,— 
Disk#______,Disk# [I INPUT 2.0, Programm, DM 98,— 
SL Preis je Disk DM 28,- (einzeln) U] DB-Meister, Programm, DM 290, 
M [I Peeker-Sammeldiskette, U Superquick, Programm, DM 48,- 
= © im Fortsetzungsbezug U) Turtle Graphics, Programm, DM 98,- 
So ab Disk# L] Disk 40, Programm, DM 48,— 
= oO (Mindestbezug 6 Disketten) U! Kyan-Pascal 2.0, Programm, DM 170,- 
Preis je Disk DM 20,- LI Fast-Writer, DOS 3.3, DM 128,- 
am: UI Apple DOS 3.3, Begleitdisk., DM 28- I Fast-Writer, ProDOS, DM 128,- 
Dei DI ProDOS, Band 1, Begleitdisk., DM 28,- D) Double-Hires-Tools für Applesoft, DM 28,- 
Gem LI ProDOS, Band 2, Begleitdisk., DM 28,— DI Double-Hires-Tools für Kyan, DM 28,- 
Peeker OÖ 1 Apple Assembler, Begleitdisk., DM 28,- ID Kyan-ToolkitNr._____, DM 
Softwareabteilung 42) 
Postfach 102869 
6900 Heidelberg 1 l Datum Unterschrift i 











PLZ/Ort 


Ich wünsche jährliche Berechnung durch: 
[1 Verlagsrechnung L] Abbuchung von 
meinem Bank- bzw, 

" Postscheckkonto 


Bank/PschA 
Bankleitzahl 


Kio.-Nr. 











uch-Karie 


a: 


Karte bitte vollständig ausfüllen 


Vorname, Name 





Firma 








Telefon mit Vorwahl 





=D Software-Karte 





Karte bitte vollständig ausfüllen 


Vorname, Name 


Firma 


Siraße 


FAYOr 


Telefon mit Vorwahl 





Bitte 


| freimachen 


POSTKARTE 


Peeker 
Leserservice 


Dr. Alfred Hüthig Verlag GmbH 
Postfach 102369 
6900 Heidelberg 


Bilte 


freimachen 


POSTKARTE 


Peeker 
Buchabteilung 


Dr. Alfred Hüthig Verlag 
Postfach 102869 
6900 Heidelberg 1 


Bitte 


ireimachen 


POSTKARTE 


Peeker 
Softwareabteilung 


Dr. Alfred Hüthig Verlag 
Postfach 102869 
6900 Heidelberg 1 











INPUT 2.0 


Ein Bildschirm- 
Maskengenerator 

für DOS 3.3 und ProDOS 
von UV. Stiehl 


1984, Diskette und Manual, DM 98, - 
ISBN 3-7785-1021-5 


„Input 2.0” liegt wahlweise in der Bank 1 
oder Bank 2 der Language Card und wird 
durch einen kurzen Driver in den unteren 
ABK aufgerufen. 

Für jedes Feld der Bildschirmmaske lassen 
sich u. a. definieren: Feldlänge (bis zu 255 
Zeichen) — Vtab - Htab — Datentyp (insge- 
samt 8 Typen) — Scrollflag (starre oder dyna- 
mische Maske) — Ctriflag — Füllflag — Lösch- 
flag — Bildschirmflag (40- oder 80-Z-Darstel- 
lung). Innerhalb eines Eingabefeldes besteht 
jeder denkbare Redigierkomfort (Insert, De- 
lete, Rubout, Restore usw.). 
Gerätevoraussetzung: Apple Ile oder IlIc; fer- 
ner Apple II+ im 40-Zeichenmodus 


MMU 2.0 

Memory Managements 
Utilities 

für die Apple lle 64K-Karte 

DOS 3.3 (und ProDOS) 


von U. Stiehl 


1984, Diskette und Manual, DM 98,- 
ISBN 3-7787-1023-1 


Insgesamt enthält die neue „MMU 2.0"- 
Diskette über 25 Programme, die neue 
Einsatzmöglichkeiten für die Extended 80 
Column Card (erweiterte 80-Z-Karte = 
64K-Karte für den Apple lle) erschließen. 
Ein Teil der Programme laufen auch auf 
dem Apple Il Plus, doch ist „MMU 2.0" 
primär für 64K-Karte-Besitzer gedacht. 


Gerätevoraussetzung: Apple Ile mit 64K- 
Karte oder IIc 


DISK 40 


Disketten-Organisationsprogramm 

für DOS-3.3 - 35-40 Spuren 

von Hermann Seibold und Dipl.-Ing. 
Udo Marin, 1986, Programmdiskette 
mit Anleitung, DM 48,- 


Durch eine einfach zu bedienende Menü- 
führung können DOS-3.3-Disketten um- 
fangreich bearbeitet oder kopiert werden. 
— Tabellarische Ausgabe der Disketten- 
belegung 

— Ordnen des Catalogs 

— „Undelete“n von versehentlich ge- 
löschten Dateien 

— Vergleichen von Disketten, 
oder DOS-Spuren 

- Kopieren von Disketten, Dateien oder 
DOS-Spuren 

— Formatieren von Daten-Disketten 

— Erweitern auf 40 Spuren bei bestehen- 
den 35-Spur-Disketten 

— Ändern des Boot-Programms 

— File-Editor zum Editieren von Disketten- 
Dateien 

— Komfortabler Sektor-Editor für Hex- 
und ASCIlI-Darstellung 

-VTOC-Editor, z.B. zur Freigabe der 
DOS-Spuren 


Hüthig Software Service, 
Postfach 102869, D-6900 Heidelberg 


Dateien 
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Grafikausdruck 
anschaulich erklärt 








Mit Apple- und Atari-Algorithmen 
für den 24-Nadel-Drucker LQ-800 


von Ulrich Stiehl 


Im Peeker sind bereits mehrere Hires- 
Grafik-Druckprogramme erschienen, von 
denen das äußerst flexible „Superdump"- 
Programm (Heft 6/85) für den Epson FX80 
und den Imagewriter am häufigsten einge- 
setzt wird. Viele Leser hatten allerdings 
Schwierigkeiten, Superdump für andere 
Drucker oder andere Interface-Karten an- 
zupassen, weil wir niemals in einer verein- 
fachten und anschaulichen Form erklärt 
haben, wie Grafikdruckprogramme funk- 
tionieren. Dies soll mit dem vorliegenden 
Beitrag nachgeholt werden, der einen kur- 
zen und hoffentlich durchsichtigen Algo- 
rithmus für den Atari ST und den Apple Il 
beschreibt. Zwar drucken wir auch für je- 
den der zwei Rechner ein Beispielpro- 
gramm ab, doch liegt das Schwergewicht 
dieses Aufsatzes auf der Beschreibung 
der Grundlagen des Algorithmus und nicht 
auf der Beschreibung der konkreten Pro- 
gramme, da hierzu GFABÄSIC- bzw. As- 
semblerkenntnisse vorausgesetzt werden 
müßten. 

Als Drucker wurde der zur Hannover-Mes- 
se 1986 vorgestellte LQ-800 von Epson 
gewählt, der mit seiner 24-Nadel-Matrix 
Grafiken mit einem 70er Raster ausdruk- 
ken kann. Dies sind rund 5.000 Bildpunkte 
pro gem! 


1. Grafikbildschirm 


Punktzeilen und Punktspalten 

Den Grafikbildschirm können wir uns als 
ein „Kartesisches Rechteck“ vorstellen, 
dessen Ursprung (Origo) sich allerdings 
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beim Apple und Atari im Gegensatz zum 
normalen kartesischen Koordinatensy- 
stem links oben befindet. Dabei nennen 
wir die Parallelen zur waagrechten X-Ach- 
se Grafikzeilen und die Parallelen zur 
senkrechten Y-Achse Grafikspalten. Der 
Apple-Bildschirm hat danach 280 Spalten 
(numeriert von 0-279) und 192 Zeilen (nu- 
meriert von 0-191); vgl. Abb. 1a. Analog 
gelten für den Atari 640 Spalten und 400 
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Abb. 1: Grafikbildschirm-Koordinaten- 
system beim Apple (1a) sowie beim Atari 


(1b) 


Zeilen; vgl. Abb. 1b. Damit beschreiben 
wir nur die jeweils verständlichste Grafik- 
auflösung beider Rechner und ignorieren 
in diesem Beitrag die Double-Hires des 
Apple (560 x 192) sowie den gesamten 
Komplex der Farbgrafik. 

Da sich die Spalten und Zeilen aus einzel- 
nen Bildpunkten = Rasterpunkten = Pi- 
xeln aufbauen, können wir den Grafikbild- 
schirm auch als eine Punktmatrix auffas- 
sen, die sich aus einer bestimmten Anzahl 
von Punktzeilen oder Punktspalten zu- 
sammensetzt, z.B. beim Atari aus 400 
Punktzeilen mit jeweils 640 Bildpunkten 
oder umgekehrt 640 Punktspalten mit je- 
weils 400 Bildpunkten. 


Konstante und variable Punktgröße 

In der Computergrafik sind Rasterpunkte 
entweder kleine Vollkreise (Apple, IBM) 
oder kleine Quadrate (Atari, Macintosh), 
so daß idealerweise zwei nebeneinander- 
liegende Punktquadrate zu einem Doppel- 
quadrat verschmelzen. Dabei entstehen 
Grautöne bei einer Grafik dadurch, daß bei 
einem entsprechenden Betrachtungsab- 
stand die schwarzen (beim Apple weißen) 
Rasterpunkte optisch mit dem weißen 
(beim Apple schwarzen) Hintergrund zu 
einem Grauton verschmelzen. 

In der drucktechnischen Reproduktions- 
photographie zur Herstellung von Abbil- 
dungen in Büchern usw. werden die ech- 
ten Grautöne von Photographien ebenfalls 
durch unechte Grautöne = Rasterpunkte 
simuliert, wie man mittels einer Lupe mit 
mindestens 10facher Vergrößerung (,„Fa- 
denzähler“) leicht nachprüfen kann. Dies 
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sollten Sie jetzt auch tun, wobei Sie insbe- 
sondere die Übergänge zwischen hellen 
und dunklen Bildstellen unter die Lupe 
nehmen sollten, weil Sie dort den Punkt- 
größenzuwachs am besten beobachten 
können. 

Der Grauwert (= auf optischer Täuschung 
beruhender Schwärzungsumfang) eines 
reprographischen Rasterfiims hängt je- 
doch nicht nur von der Anzahl der Raster- 
punkte pro cm ab (z.B. 7Der Raster = 70 
Punkte pro cm oder 70 mal 70 = 4900 
Punkte pro gem), sondern insbesondere 
von der Größe der Rasterpunkte selbst, 
wobei ein einzelner Rasterpunkt von ei- 
nem mikroskopisch kleinen Pünktchen bis 
zu einem vollen Punktkreis anwachsen 
Kann. Bei „digitalen“ Computern ist die- 
ses „analoge“ Prinzip, das zu einer erheb- 
lich besseren Bildqualität führt, zur Zeit 
kaum denkbar, denn der Grafikbildschirm 
setzt sich beim Apple aus immerhin 280 x 
192 = 53.760 Punkten und beim Atari 
bereits aus 640 x 400 = 256.000 Punkten 
zusammen, Gäbe es nämlich für jeden 
einzelnen Punkt noch beispielsweise 100 
verschiedene Punktgrößen vom winzigen 
Pünktchen bis zum vollen Punktquadrat, 
dann müßten geradezu gigantische Grafik- 
speicher vorhanden sein, Das in der Re- 
produktionsphotographie zur Realisierung 
von Grauwerten angewandte Verfahren 
variabler Punktgrößen wird man deshalb 
insbesondere bei Mikrocomputern vorab 
nicht realisieren können. Um einen einzel- 
nen Rasterpunkt zu vergrößern, muß man 
vier gleichgroße Rasterpunkte im Karree 
anordnen, worauf wir später noch einge- 
hen werden. 


2. Bildpunkt und Nadelpunkt 


Der Druckkopf eines Nadel- oder Matrix- 
druckers enthält eine bestimmte Anzahl 
von senkrecht oder vertikal zur Druckzeile 
angeordneten Nadeln, die von Elektroma- 
gneten durch das Farbband auf das Papier 
gedrückt werden. Da der Druckkopf über 
die Nadeln mit dem Papier in Berührung 
gelangt, spricht man auch vom Impact- 
Verfahren im Gegensatz zum berührungs- 
losen Non-Impact-Verfahren bei 
Farbstrahldruckern usw. Im übrigen geht 
die Terminologie ziemlich durcheinander, 
da bereits der Begriff des Matrixdruckers 
falsch gewählt ist, denn der Druck im 
drucktechnischen Sinne setzt einen ei- 
gens zu diesem Zweck angefertigten 
Druckträger (z.B. Offsetplatte im Flach- 
druck, Kupferzylinder im Tiefdruck usw.) 
voraus, mit dessen Hilfe eine Vielzahl glei- 
cher Abdrucke erzeugt werden kann, wäh- 
rend umgekehrt ein Matrix,drucker“ das 
Druckbild immer wieder neu generieren 
muß. 
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Das Druckbild kann bei einem Matrixdruk- 
ker auf zweifache Weise generiert werden: 


Selbstgesteuerter Bildaufbau: Diese 
Form des Bildaufbaus ist typisch für den 
Ausdruck von Texten. Wenn wir beispiels- 
weise über den Mikrocomputer den AS- 
Cll-Code für den Buchstaben „A“ an den 
Drucker senden, so baut er das Buchsta- 
benbild von „A“ aus einer bestimmte An- 
zahl vertikaler Nadelspalten selbst auf, 
vereinfacht etwa folgendermaßen: 


Der Programmierer muß sich also hier kei- 
ne Gedanken über die Punktmatrix des 
Buchstabens „A“ machen. Anders wür- 
den die Dinge liegen, wenn man eigene 
Zeichen definieren wollte, deren Matrix 
dann im RAM-Speicher des Druckers ab- 
gelegt werden müßte. Nach der Neudefin- 
ition der Matrix des Buchstabens „A“ wür- 
de es jedoch wiederum genügen, daß man 
den ASCII-Code von „A“ an den Drucker 
sendet und nicht dessen Punktinforma- 
tionen. 


Computergesteuerter Bildaufbau: 
Wenn nun jedoch Grafiken ausgedruckt 
werden sollen, so muß dem Matrixdrucker 
mitgeteilt werden, welche der Nadeln beim 
Aufbau der jeweiligen Nadelspalte aktiviert 
werden sollen, denn Anweisungen in der 
Art von „Print Mona Lisa“ reichen leider 
nicht aus, weil die Zahl der (möglichen) 
Grafikbilder im Gegensatz zur Zahl der 
(üblichen) Buchstabenbilder schier 
unendlich groß ist. 


Wir halten zunächst fest, daß die gesamte 
Druckgrafik aus einer bestimmten Anzahl 
von Druckzeilen besteht, die sich ihrer- 
seits aus einer bestimmten Anzahl von 
Nadelspalten zusammensetzen, wobei die 
Nadeln einer Spalte selektiv aktiviert wer- 
den können. 


Während herkömmliche Matrixdrucker oft 
nur über 8 Nadeln verfügten, befinden sich 
ım Druckkopf des LO-800-Epsondruckers 
(LQ = Letter Quality) 24 vertikal angeord- 
nete Nadeln. Die Druckqualität ist deshalb 
bei Texten beeindruckend, wie man dem 
Ausdruck des Standardzeichensatzes ent- 
nehmen kann, Aber auch für den Grafik- 
ausdruck ergeben sich Qualitätsvorteile, 
weil in 24-Nadel-Zeilen gedruckt werden 
Kann, wobei der vertikale und horizontale 
Nadelabstand 1/180 Zoll = ca. 0,14mm 
beträgt. Dies entspricht etwa einem 70er 
Raster (= 70 Nadelpunkte pro cm — 0,14 
* /0 = ca. IOmm), der beispielsweise im 
Offsetdruck nur bei Farbvorlagen (z.B. 
Peeker-Titelseiten) benutzt wird. Dabei 


kann eine Zeile theoretisch aus 1440 dis- 
kreten Nadelspalten bestehen (1/180 x 
1440 = 8 Zoll oder ca. 20,3cm), die jedoch 
praktisch nicht mehr unterscheidbar sind. 


Daß die LQO-800-Druckqaualität trotzdem 
immer noch von einer Offset-Druckqualität 
himmelweit entfernt ist, ist auf folgende 
Faktoren zurückzuführen: 


— Die Papieroberfläche der normalen End- 
Iosdruckpapiere ist für einen 70er Raster 
viel zu rauh. Außerdem fehlt es an der 
nötigen Dimensionsstabilität bzw. Zug- 
festigkeit des Papiers, obwohl Grafiken 
nur von links nach rechts, d.h. uni- statt bi- 
direktional, ausgedruckt werden. 

— Das Stoffarbband ist für derart feine Na- 
deln völlig ungeeignet. Man müßte eigent- 
lich ein Einmalfarbband (Karbonfarbband) 
verwenden. 

— Die Nadelpunktgröße ist ähnlich wie die 
Bildschirmpunktgröße nicht variabel mit 
der Folge, daß einerseits dunklere Bild- 
stellen zu dunkel und hellere Stellen zu 
hell werden, womit die Grauskala nicht 
mehr stimmt. 

Trotz alledem bietet der LQ-800 die best- 
mögliche Druckqualität, die mit heutigen 
Matrixdruckern erzielbar ist. 


3. Makrozeilen 


Die 24 vertikalen Nadeln des LQ-800 kön- 
nen wir von O (oberste Nadel) bis 23 (un- 
terste Nadel) durchnumerieren. Da der 
Grafikbildschirm beim Apple aus 192 
Punktzeilen (0-191) und beim Atari aus 
400 Punktzeilen (0-399) besteht, könnte 
man theoretisch nur jeweils die Nadel O 
bei einem Vorschub von 1/180 Zoll (= 
Größe einer Nadel) benutzen und dann 
beim Apple die 192 und beim Atari die 400 
Grafikpunktzeilen als entsprechende Na- 
deldruckzeilen auf den LQ-800 herauslas- 
sen. Tatsächlich gibt es von der Firma 
M.Gehret Useware in Grönenbach ein 
Atari-LQ-800-Dump-Programm für DM 
100,-, das u.a. nach diesem Verfahren ar- 
beitet. Der Ausdruck des Atari-Bildschirms 
dauert dann sage und schreibe über 7min 
und liefert zudem ein verschmiertes Bild. 
Dies ist natürlich Bauernfängerei, denn ein 
100-DM-Programm für einen 24-Nadel- 
Drucker muß alle 24 Nadeln gleichzeitig 
benutzen können, denn sonst brauchte 
man keinen teuren 24-Nadel-Drucker zu 
Kaufen. 


Unser Grafikdruckprogramm verwendet 
selbstverständlich alle 24 Nadeln. Wir kön- 
nen deshalb die 192 Apple-Punktzeilen in 
exakt 8 Makrozeilen, numeriert von O bis 
7, mit je 24 Punktzeilen aufteilen (8x 24 = 
192); vgl. Abb 2a. Das analoge Rechen- 
exempel für den Atari mit seinen 400 
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Abb. 2: 24-Punkt-Grafikbildschirm-Makro- 
zeilen beim Apple (2a) sowie beim Atari 
(2b) 


Punktzeilen geht jedoch nicht ganz glatt 
auf (400 : 24 = 16 komplette 24-Punkt- 
Makrozeilen und 1 Restmakrozeile mit nur 
16 Punktzeilen); vgl. Abb. 2b. Somit muß 
der LQ-800-Druckkopf beim Apple 8mal 
und beim Atari 17mal bewegt werden, um 
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einen kompletten Grafikausdruck zu er- 
zeugen. Der Algorithmus ist damit für den 
Apple oder Atari folgender (vgl. Abb. 2a): 


Algorithmus 

Schritt 1: Setze den Makrozeilenzähler auf 
Null. 

Schritt 2: Setze den Spaltenzähler auf 
Null. 

Schritt 3: Hole die momentane Spalte der 
momentanen Makrozeile (= 24 vertikale 
Punkte) aus dem Grafikbildschirm und 
schicke sie an den Drucker. 

Schritt 4: Erhöhe den Spaltenzähler um 
eins. Falls die 280. (beim Atari 640.) Bild- 
schirmspalte noch nicht erreicht ist, gehe 
zurück zu Schritt 3. 

Schritt 5: Sende einen Zeilenvorschub im 
Abstand von 24 Nadeln an den Drucker. 
Schritt 6: Erhöhe den Makrozeilenzähler 
um eins. Falls die 8. (beim Atari 17.) Ma- 
krozeile noch nicht erreicht ist, gehe zu- 
rück zu Schritt 2. 


4. „Liegende Zeilenbytes“ 


Mit dem obigen Algorithmus haben wir das 
Grafik-Dump-Problem grundsätzlich ge- 
löst. Wenn wir uns jedoch jetzt an die 
Implementierung eines konkreten Dump- 
Programms machen, so stoßen wir auf 
unerwartete Komplikationen, die darauf 
zurückzuführen sind, daß die Bildschirm- 
punkte als „liegende Zeilenbytes“ gespei- 
chert werden, während der Drucker „ste- 
hende Spaltenbytes“ erwartet. 

Ein Byte besteht bekanntlich aus 8 Bits, 
die üblicherweise „liegend“ von rechts 
nach links dargestellt und entsprechend 
von O bis 7 durchnumeriert werden. Ein Bit 
selbst kann den Wert O oder 1 annehmen. 
Dabei entspricht ein Einserbit einem ge- 
setzten bzw. sichtbaren Punkt und ein 
Nullerbit einem gelöschten bzw. unsicht- 
baren Punkt. Ein Bildschirmspeicherbyte 
enthält somit 8 Bits und damit (theoretisch 
auch) 8 horizontale Rasterpunkte. Der 
Speicher des Apple wie auch des Atari ist 
also dergestalt organisiert, daß die gesetz- 
ten Bits eines Bytes für die sichtbaren 
Punkte einer horizontalen Punktfolge = 
Punktzeile stehen. Betrachten wir hierzu 
das allererste Byte des Bildschirmspei- 
chers beim Apple und Atari und nehmen 
zusätzlich an, daß der zweite Bildpunkt 
von links, also Punkt 1 bei einer Zählung 
von OÖ bis 279 bzw. 399, gesetzt sein soll: 


81234567 Punktnummern 
Punkt 
7654321® Bit-Nummern 
BLBBBRBB Atari-Bits 
x@BBBB1d Apple-Bits 


Beim Atari muß Bit 6 gesetzt werden, um 
Punkt I zu erzeugen, während beim Apple 
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Bit 1 gesetzt werden muß, um Punkt 1 zu 
erzeugen. Daraus folgt: Beim Atari zeigen 
die linken Bits zum linken Bildschirmrand 
(vgl. Abb. 3b), während beim Apple um- 
gekehrt die rechten Bits zum linken Bild- 
schirmrand zeigen (vgl. Abb. 3a). Beim 
Apple kommt erschwerend hinzu, daß Bit 
/ als Farbbit reserviert ist und deshalb 
auch auf einem Schwarzweißmonitor kei- 
nen Rasterpunkt erzeugt. Demgegen- 


über gibt es beim Atari nur dann reservier- 
te Farbbits, wenn ein Farbmonitor benutzt 
wird. 
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Abb. 3: Grafikbildschirm-Punkt-Reihenfol- 
ge der „liegenden Zeilenbytes“ beim Apple 
(3a) sowie beim Atari (3b) 


Test für Apple 

Um sich von der Richtigkeit der umge- 
drehten Bitreihenfolge beim Apple zu 
überzeugen, kann man mit 

CALL -151 

in den Monitor gehen, nachdem man zu- 
vor mit 

HGR 

die Grafik eingeschaltet hat. Wenn man 
nun 

2000:02 (= Bitmuster 00000010) 

eingibt, wird Punkt 1 von Punktzeile O 
sichtbar, während mit beispielsweise 
2000:10 (= Bitmuster 00010000) 

ein um drei Stellen nach rechts versetzter 
Punkt generiert wird. 


Test für Atari 

Das nachfolgende GFABASIC-Programm 
namens PUNKT.BAS demonstriert einen 
von links nach rechts wandernden Punkt, 
der durch eine 32-Bit-Langwort-Maske 
(Punktspalte 0 bis 31) erzeugt wird. Dazu 
setzen wir zunächst in Punktspalte 32 ei- 
nen „Grenzpunkt“, dem sich der wan- 
dernde Punkte allmählich nähert, wobei 
zusätzlich die jeweils gepokte Bitmaske 
als Binärzahl angezeigt wird. Die 32 Lang- 
wort-Masken repräsentierten folgende Bit- 
Muster: 


L2 (8) LBBBBSADDDDAennnnnng 
L% (1) B10BBDD0DOennnennnnn 
LA (2) BBLDBDDNDDDDDDDeeenengnnennnn 
USW. 

1229) OBBnDnnnDDDnDnaeneeneg 
LA(SB) MOBBDDnDDDeenennnnnnenn 
LA(S1) DODDnDDnnDDDenennennem 


Ft art 


— 
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Mit Lpoke S%, L% (0) wird somit ein Punkt 
in Spalte O und mit Lpoke S%, L% (31) ein 
Punkt in Spalte 31 gesetzt. S% (= 
Screen) steht dabei für die Bildschirm- 
adresse der jeweiligen Punktzeile. 


Rem Wandernder Punkt 
S7=Xbios(2)+20+80 !Zeile 20 
Dim LZ(31) 
LA(B)=-2131 
YA=31 
For X%=1 To 31 
Dec Y% 
LZ(XZ)=21V% 
Next X% 
Lpoke Xbios(2)+20s8Pß+4,1L2(9) !Spalte 32 
For 2:0 Ta sl I|Punktspalte ® bis 31 
L$=Bin$(LZ(X%)) 
L=Len(L$) 
Print At(1,1);Spc(32-L);L$ 
Lpoke 5%,L%(X%) !Punkt setzen 
Pause 5ß 
Next X% 


Aus Abb. 3 können wir ersehen, daß sich 
eine horizontale Punktzeile beim Apple 
aus 40 Bytes (numeriert O bis 39) und 
beim Atari aus 80 Bytes (numeriert O bis 
79) = 40 Wörtern (Words) = 20 Langwör- 
tern (Long Words) zusammensetzt. 
„Liegende Zeilenbytes“ lassen sich in 
BASIC oder Assembler leicht peeken. Der 
Drucker benötigt jedoch keine „liegenden 
Zeilenbytes“, sondern „stehende Spal- 
tenbytes“, denn die Druckkopfnadeln sind 
vertikal angeordnet. „Stehende Spalten- 
bytes” lassen sich jedoch weder in BASIC 
peeken noch in Assembler in ein Prozes- 
sorregister laden, sondern müssen viel- 
mehr für einen 24-Nadeldrucker aus je- 
weils 24 Zeilenbytes einzeln extrahiert 
werden. Dies kostet jedoch sehr viel Pro- 
zessorzeit, denn eine Apple-Grafik umfaßt 
280 x 192 = 53.760 Bits, und eine Atari- 
Grafik enthält sogar 256.000 Bits. Typi- 
scherweise entfallen deshalb über 90% 
der Laufzeit eines Grafik-Dump-Pro- 
gramms auf dieses „Herauspulen“ = Ex- 
trahieren der Spaltenbits. Wäre der Grafik- 
bildschirm nicht zeilen-, sondern spalten- 
weise dergestalt organisiert, daß die 8 Bits 
eines Bytes 8 senkrechte Rasterpunkte 
repräsentieren würden, dann könnten zu- 
mindest 1:1-Grafik-Dump-Programme 
selbst in BASIC effizient geschrieben 
werden. 


Wie gelangt man nun von „liegenden Zei- 
lenbytes" zu „stehenden Spaltenbytes"? 
Zunächst müssen wir wissen, daß ein 24- 
Nadel-Drucker bei einer parallelen 
Schnittstelle nicht 24 Bits gleichzeitig, 
sondern 3 x 8 Bits in Form von 3 Bytes 
nacheinander empfängt (1. Byte, 2. Byte, 
3. Byte). In Abb. 4a sehen wir 3 liegende 
Bytes, die die 24 gesendeten Bits symbo- 
lisieren, während die 3 stehenden Bytes 
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Abb. 4: Zuordnung der Bits der Sendebytes zu den Bits der Nadelspalte-Bytes beim LQ- 
800 (4a: 24 Nadeln), FX80 (4b: 8 Nadeln) und Imagewriter (4c: 8 Nadeln) 


die 24 Nadeln repräsentieren. Bit 7 des 1. 
gesendeten Bytes steuert also Nadel 0, 
während Bit 0 des 3. gesendeten Bytes 
Nadel 23 aktiviert. Diese Zuordnung gilt für 
den LQ-800. Für den 8-Nadel-Drucker 
FX80 (vgl. Abb. 4b) gilt das gleiche, wäh- 
rend beispielsweise beim 8-Nadel-Ima- 
gewriter (vgl. Abb. 4c) die Bit-Nadel-Zu- 
ordnung verdreht ist. 


Bleiben wir zunächst aus Gründen der 
Vereinfachung bei einem 8-Nadel-Drucker 
vom Typ Epson FX80 und betrachten Abb. 
5a in Verbindung mit Abb Ab. Um beim 
Apple mit dem FX80 Spalte O von Zeile O 
mit 8 vertikalen Nadeln zu drucken, muß 
aus 8 untereinanderliegenden Bildschirm- 
zeilen das jeweilige Bit O „herausgepult“ 


und von rechts nach links in ein „liegen- 
des Byte” geschoben werden, das dann 
das an den Drucker zu sendende 1. Byte 
darstellt. Bit O von Byte O wird dann zum 
Bit 7 des 1. Bytes, BitO von Byte 1 zum Bit 
6 des 1. Bytes usw., bis schließlich Bit O 
von Byte 7 zum Bit O des 1. Bytes wird. 
Dieses dergestalt mit 8 Bits gefüllte 1. 
Byte (vgl. Abb. 5a) geht dann zum Drucker 
und steuert dort die Nadeln O bis 7 (vgl. 
Abb 4b). 


Wenn wir statt eines 8-Nadel-Druckers 
den 24-Nadel-LQ-800 verwenden (vgl. 
Abb. 5b), so benötigen wird neben dem 1. 
Byte noch das 2. und 3. Byte, die nachein- 
ander zum Drucker geschickt werden. 
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Abb. 5: Hineinschieben der Bits von 8 
Grafikbildschirm-Zeilen in 1 Sendebyte 
(5a: FX80) oder der Bits von 24 Zeilen in 3 
Sendebytes (5b: LQ-800) beim Apple. 
Beim Atari würde man mit dem höchsten 
statt mit dem niedrigsten Bit beginnen. 


Entsprechend müssen wir die dann zum 
Füllen der 3 Bytes benötigten 24 Bits aus 
insgesamt 24 untereinanderliegenden Zei- 
lenbytes „herauspulen“. 

Abb. 5a und 5b beziehen sich auf den 
Apple-Bildschirm. Beim Atari würden wir 
mit Bit 7 statt mit Bit O beginnen. 


Zusammenfassung 

Die Einser- und Nullerbits eines an den 
Drucker geschickten Bytes repräsentieren 
die zu aktivierenden bzw. nicht zu aktivie- 
renden vertikalen Nadeln. Für 1 Nadel- 
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Ausdruck a: LQ-800-Zeichensatz 1:1 
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Ausdruck c: Apple-Grafik 1:1 auf LQ-800 


Bei einem Grafikausdruck ohne Grauwertverlust (Ausdrucke b und c) wird sofort die zu 
steile „Gradation“ deutlich, d.h. die helleren Stellen („Lichter“) sind zu weiß und die 
dunkleren Stellen („Tiefen“) sind zu schwarz. Die Grafikausdrucke sehen deshalb so 
aus, als wären echte Halbtonvorlagen ohne Verwendung eines Rasters („Magenta-Kon- 
taktrasters“) reproduziert worden. Damit dies auch wirklich deutlich wird, wurden in un- 
serer Reproanstalt ausdrücklich sog. Strichaufnahmen gemacht, während wir sonst Gra- 
fikauscdrucke aufrastern lassen. Im Grunde lassen sich jedoch mit Stoffarbband herge- 
stellte Epson-Ausdrucke weder gerastert noch ungerastert zufriedenstellend reproduzie- 
ren, weil die Reprovorlagen keine ausreichende Deckung aufweisen, wie dies etwa bei 
den in unserem grafischen Atelier hergestellten technischen Zeichnungen der Fall ist. 
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spalte benötigt ein 8-Nadel-Drucker 1 
Byte und ein 24-Nadel-Drucker entspre- 
chend 3 Bytes. 

Ein Grafikspeicherbyte repräsentiert beim 
Apple 7 und beim Atari 8 horizontale Bild- 
punkte. Um ein „Nadelbyte“ für den Ma- 
trixdrucker zu erzeugen, müssen folglich 
die entsprechenden Bits aus 8 Grafik- 
punktzeilen extrahiert werden. Dies ge- 
schieht in Assembler mittels Schiebe- und 
Rotierbefehlen. 


6. Grafikumschaltung 


Wenn wir ein Byte mit dem hexadezimalen 
Wert $55 (= binär %01010101 = dezimal 
85) an den Drucker senden, so wird zu 
unserer Überraschung nicht jede zweite 
Nadel eines 8-Nadelkopfes aktiviert, son- 
dern vielmehr der Buchstabe „U” ausge- 
geben, denn der ASCII-Code von „U" ist 
85. Wir müssen also dem Drucker zu- 
nächst einmal mitteilen, daß wir jetzt Grafik 
und nicht normale Buchstaben ausdruk- 
ken wollen. Für den Atari gilt dann in Ver- 
bindung mit dem LQ-800 folgendes: 

1. Da der vertikale Nadelabstand 1/180 
Zoll beträgt und alle 24 Nadeln benutzt 
werden sollen (= Makrozeilen, s.o.), muß 
der Zeilenvorschub 24/180 Zoll betragen. 
Die ESC-Sequenz hierfür lautet: 

ESC „3" 24 

oder 

Chr$(27) Chr$(51) Chr$(24) 

Wir brauchen dann später nur noch nach 
jeder Makrozeile ein Wagenrücklauf-Zei- 
ienvorschub-Kommando (CR-LF) an den 
Drucker zu senden. 

2. Jede Makrozeile leiten wir zudem 
zwecks Umschaltung auf den Grafikmo- 
dus mit folgender ESC-Sequenz ein: 
Er 

oder 

Chr$(27) Chr$(42) Chr$(39) Chr$(128) 
Chr$(2) 

Die Zahl 39 steht für einen horizontalen 
Nadelabstand von 1/180 Zoll. Damit sind 
vertikaler und horizontaler Punktabstand 
identisch, und die Grafik wird folglich un- 
verzerrt („ohne Zoom“) ausgedruckt. 

Die Zahlen 128 (Low Byte) und 2 (High 
Byte) stehen für 128 + 2 * 256 = 640. 
Dies ist die Anzahl der Punktspalten beim 
Atari-Bildschirm. 

3. Nachdem die gesamte Grafik mit ihren 
17 Makrozeilen ausgedruckt worden ist, 
schalten wird mit 

ES. 25 

auf den normalen Text-Zeilenvorschub zu- 
rück (= 30/180 oder 1/6 Zoll). Ein Abstel- 
len des Grafikmodus ist nicht erforderlich, 
da der LQ-800 automatisch auf Textmodus 
zurückschaltet, sobald er die für eine Ma- 
krozeile erforderlichen Bytes empfangen 
hat. Aus diesem Grunde muß deshalb 
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auch jede weitere Makrozeile erneut mit 
der obigen ESC-Seqauenz eingeleitet 
werden. 


7. Grafikvergrößerung 


Oft möchte man Grafiken nicht 1:1 aus- 
drucken, weil die Ausdrucke dann recht 
klein sind (beim Atari ca. 9cm Breite x 
»,6cm Höhe, beim Apple entsprechend 
kleiner), denn der Punktabstand beträgt 
bekanntlich nur 1/180 Zoll = 0,14mm). Es 
bieten sich zwei Möglichkeiten an: 


1. Vergrößerung mit Grauwertverlust: 
Rechts neben und unter jedem Punkt wird 
ein zusätzlicher „Leerpunkt“ eingefügt. 
Dadurch wird der Ausdruck jedoch sehr 
grau, weil die Punktgröße unverändert 
bleibt. Beispiel: 


> 


2. Vergrößerung ohne Grauwertverlust: 
Jeder Punkt wird nach rechts und nach 
unten verdoppelt. Es entstehen dann 
gleichschwarze Ausdrucke wie beim 1:1- 
Grrafik-Dump. Beispiel: 


. > oalke. 


8. Atari-Beispielprogramm 


Das folgende GFABASIC-Programm er- 
zeugt einen 1:1-Grafikausdruck. Obwohl 
es seinen Zweck erfüllt, dient es nur zur 
Veranschaulichung des im Abschnitt 3 be- 
schriebenen Algorithmus, denn der Aus- 
druck dauert auf dem LQ-800 ca. 3min., 
weil GFABASIC wie auch die anderen 
Hochsprachen über keinen Rotierbefehl 
verfügt. Die Simulation der Bit-Rotierung 
nimmt deshalb 90% der Laufzeit der 
Dump-Prozedur ein. Eine nähere Erläute- 
rung des Programms ist an dieser Stelle 
nicht sinnvoll, da hierzu GFABASIC- 
Kenntnisse vorausgesetzt werden müß- 
tem. 


(Ein 68000-Drucker-Dump-Programm fin- 
den Sie auf der Seite 36.) 


HGRLO.BAS 
(1:1-Atari-LQ-800-Dump mit Demo) 


Rem x** Atari-LQ-Sßß-HGR-Dump #*%* 
Color 1 

Box B,0,639,399 

DEFT EL] ce 


Fill 1,1 

Gosub Screendunmp 

End 

Rem --—--------—— 


Procedure Screendunmp 
EoCaleX#97%137 


S$=Xbios(2) 
Rem -—---- 
Dim Longmaske%(31) 
Longmaske% (d)=-2131 
Y%=31 
For XZ=1 To 31 
Dec Y% 
Longmaske#(X%)=21Y% 
Next X% 
Dim Long%(23) 
Rem --—------—- —— nn nn — 
Pinit$=Chr$ (27)+"3"+Chr$ (24) 
Pline$=Chr$(27)+"#"+Chr$ (39) 
Pline$=Pline$+Chr$(128}+Chr$(2) 
Pexit$=Chr$ (27)+"2" 
Rem ---—-——-------- - _ 
Lprint Pinit$ 
For Vpos1%= To 498-24 Step 24 
Lprint Pline$; 
For Hpos#=® To 86-4 Step 4 

Vpos2%=Vpos1% 

For X%=ß To 23 
Long%(X%)=Lpeek (S%+Vpos2%#*80+Hpos%) 
Inc Vpos2% 

Next 2X% 

For Y%=ß To 31 
Long#=® 
For X%=0 To 23 

Rem Die zwei folgenden Zeilen 
Rem simulieren den Rotierbefehl 
If Long%(X%) And Longmaske%(Y%) 
Add Long%, Longmaske%(X%) 
Endif 
Next X% 
Long$=Mk1$ (Long%} 
Lprint Left$(Long$,3): 
Next Y2 
Next Hpos% 
Lprint 
Next Vpos1% 
Lprint Pexit$ 
Erase Longnaske%({) 
Erase Long%() 
Return 


9. Apple-Beispielprogramm 


Für den Apple mußte das Druckprogramm 
LQ800.HGRI (für 1:1-Grafik-Dump) in 
6502-Assembler geschrieben werden. Es 
ist deshalb entsprechend schnell, und der 
Ausdruck wäre nach 3 Sekunden erledigt, 
wenn der LQ-800 genauso flott wäre. 
Auch hier verzichten wir auf eine Erläute- 
rung des Programms, weil dazu Assem- 
blerkenntnisse erforderlich sind. Im übri- 
gen lehnt es sich exakt an den oben be- 
schriebenen Algorithmus an. 

Zusätzlich drucken wir einen Auszug aus 
dem Programm LO800.HGR3 ab, das ei- 
nen 3:1-Ausdruck ohne Grauwertverlust 
erzeugt. 


HGR1.TEST 
(Demo für 1:1-Apple-LQ-800-Dump) 


18 PRINT CHR$ (4) ;"BLOAD LOSBB.HGRI" 

15 A = 24576: REM $6060 

208 POKE A + 3,32: REM Page 1 

25 POKE A + 4,1 * 16: REM Siot 1 

38 POKE A + 5,9: REM Positiv 

35 HGR : HCOLOR= 7 

Ad HPLOT 9,8 TO 279,8 TO 279,191 
TO 8,191 TO 8,9 

45 HPLOT 8,8 TO 279,181 

58 HPLOT 8,191 TO 279,6 

55 REM 4 Modes testen 

668 PRINT CHR$ (4); "PR#1" 

65 FOR X = 1 TO 4: READ Y 

78 FPOKE A + 6,Y: CALL A 


75 PRINT : NEXT X 
808 PRINT CHR$ (4); "PR#ß" 
85 TEXT 


96 DATA 32,33,38,39 
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LQ800.HGR1 88 LDX #2 93 % 
az Er. : 89 DRUCK4 LDA BYTE3,X 94 VERTIKAL PHP 
1 1 Apple LQ 800 Dump) 98 JSR PRINT 95 RÖL BYTEZ3 ‚äfach 
al DEX 96 ROL BYTE2 :vertik. 
92 BPL DRUCKA 37 ROL BYTEl ‚dehnen 
BSAVE LOBßB.HGRI, A$S009, L218 93 DEY 98 PEP 
94 BNE DRUCK2 SE, RTS 
1 ORG $6Bp0 95 «+ 180 * 
3 * 96 x* 4 Horizontalbytes -39 1681 HORIZONT LDX #2 ‚Sfach 
4 % 1l:1l-Ausdruck: L9889.HGRI1 97 %* 182 HORIZ1 LDA BYTEZ,X ;horiz. 
5  &* 98 INC HPOS _ 103 JSR PRINT ;drucken 
6 JMP START 99 LDY HPOS 104 DEX 
7 M———m—— nn 198 CPY #46 125 BPL HORIZ] 
8 PAGE HEX 28 ;20=Pg 2 181 BNE LOOP2 > 106 RTS 
9 SLOT HEX 19 :Slot#16 192 * 
18 XOR HEX 90 ;FF=negativ 193 LDX #9 
11 MODE HEX 27 ;20/21/26/27 184 ESCPRT2 LDA ESC2,X 
SE ana —— Mr u NT Kurzhinweise 
13 PUFFER EQU $9289 ;24 Bytes 107 CPX +#ESC3-ESC2 für die Apple-Sammeldisk 
= en Es ne 108 BNE ESCPRT2 
CE 189 & N ' r : : 
16 BYTES EAU SöBlo ee Die Sammeldisk enthält die Dateien 
17 BYTER  EQU $O0la 2, HGR1.TEST (Demo-Programm) 
ı8 BYEI Eau 80018 112 CLC T.LQ800.HGR1 (Big-Mac-Quelltext) 
vPOS1 EQU S$BBFA 113 LDA vVPOSI LQ800.HG ' 
26 VPOS2  EQU $BBFB 114 ADC #24 ‚HGR1 (Objektcode) 
21 HPOS EQU  $pgrFc 115 STA VPOS1 für 1:1-Dump ohne Grauwertverlust 
22 AREG EQU $PBFD 116 CMP #191 
25  YREG EQU $PBFE 117 BCS ENDE HGR3.TEST (D » 
24 %* 118 JMP LOOP1 > . emo-Frogramm 
25 START LDA #9 119 ENDE  RIS T.LQ800.HGR3 (Big-Mac-Quelltext) 
26 STA VPOS1 Ola a ee ee een € 
97 LDA MODE 121 * Esc-3 n/18ß 1LQ800.HGR3 (Objektcode) 
28 STA M 122 ESC1 HEX 1833 ;Eso 3 für 3:1-Dump ohne Grauwertverlust (Q = 
RI Rn — 123 HEX 18 ‚24/180 Quick) 
38 LOOPI1 LDY #9 ;Y=9-39 124 & Esc-x m 11 hh 
Sl STY HPOS 125 HEX I1B2A ;Esc %* 
32 * 1 M : 
= Der Es ee IR HGR3Q.TEST (Demo-Programm) 
34 ESCPRTl LDA ESC1,X 128 * CR-LF Esc-2 T.L0800.HGR3Q (Big-Mac-Quelltext) 
35 JSR PRINT 129 ESC2 HEX $DBA ; CR-LF L N 
= ng = en re ung (Objektcode) 
37 CPX +ESC2-ESCI 131 ESCZ NOP für 3:1-Dump mit Grauwertverlust 
38 BNE ESCPRTI zo Ernie u 
39 % 135 * Zeichen im Akkumulator senden 
ad LOoOP2 LDX #8 ;X=9-23 134 PRINT  STA AREG TEXT ILEZT (Demo-P rogramm) 
je DM Kae" 135 STY YREG T.TEXT.LQ800 (Big-Mac-Quelltext) 
136 LEYFFSEOT | 
43 % 137 OFFLINE? LDA $cB8l,Y TEXT.LQ800 (Objektcode) a 
44 x 24 Vertikalbytes ß-23 138 ASL für den Zeichensatz-Dump, der in diesem 
45 %* 139 ASL ! r 1 
er oo Tears ” en Beitrag abgebildet worden ist. 
47 AND +#%11009909 141 READY? LDA $cö8l,Y 
ss Fun Be an en Man beachte, daß die Druckroutinen auf 
READY“ . i : 
50 LSR Da ae die Parallel-Interface-Karte der Firma Nip- 
> an nz 145 SEND STA $cHsl,Y pon Express, Hamburg, abgestimmt sind, 
& ee nn Sn, die mit der alten Orange-Grappler- bzw. 
54 STA HBASH 148 OFFEXIT LDY YREG Star-Micromix-Graphstar-Karte funktions- 
= Ra ne gleich ist. Für andere Parallel-Karten sind 
57 ASL in LQ800.HGR1 (Zeile 134-150) usw. ent- 
58 ROL HBASH sprechende Anpassungen erforderlich. 
59 ASL : ö h 
68 ROIL. HBASH Wir haben diese Karte hier deshalb ausge- 
= = 5 wählt, weil sie beispielsweise bei dem Su- 
BASL . Me E e 
= ae Es LQ800.HGR3 perdump-Programm keine Berücksichti- 
64 AND +720@B1111l (3:1-Apple-LQ-800-Dump, Auszug des gung fand und dort entsprechend einge- 
65 ORA PAGE N ir 
2 Ser Listings) fügt werden kann. 
67 %* 
68 LDY HPOS 1 ORG $6B08 
69 LDA (HBASL),Y 3 * 
78 EOR XOR ;invertieren 4 x 5:1-Ausdruck: LO8P9.HGR3 
im: STA PUFFER,X E 
TR INC VPOS2 77 %* Sfach dehnen nach rechts + unten 
73 INX 78 DEHNENl LDY #7 ‚7 Bits 
74 CPX #24 79 DEHNEN2 LDX #9 
75 BNE LOOP3 1: 8ß DEHNEN3 LSR PUFFER,X 
76 x 81 JSR VERTIKAL 
77 %* 7Tmal 24 senkrechte Bits drucken 82 JSR VERTIKAL 
73 %* 83 JSR VERTIKAL 
79 DRUCKI LDY #7 ‚7 Bits 84 INX 
8Ö DRUCK2 LDX #9 85 CPX #8 ;8 Bytes 
81 DRUCK3 LSR PUFPFER,X 86 EBENE DEHNEN3 
82 ROL BYTES 87 JSR HORIZONFT 
83 ROL BYTE2 88 JSR HORIZONT 
84 ROLFEBFYTRI 89 . JSR HORIZONT 
85 INX 9 DEY 
86 CPX #24 ‚24 Bytes 91 BNE DEHNEN2 
87 BNE DRUCKS 92 BEQ WEITER ‚im Listing 
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LQG.ASM 
I PAGELEN 1966 :KEIN FF 
2 SECTION ONE ;FUER GST 
3. 
4 ; L0G.ASM = LO8ßPß-Screendump 1:2 
DD m 
6 : GST-Assembler; us/1.12.86 
74 i 
8 ; LOG.ASM -LIST LOG.LST -BIN LOG.PRG -NOLINK 
9 . 
18 ;: Dd = Screen-Basis 
il ; Di = Vpos (B-488) 
12 ; D2 = Vpos-Tenmporary 
13 ; Shift-Temporary Rem LOG.ASM-Test für GFABASIC 
14 ; D3 = Hpos (9-8ß) Rem Vorher Testbild erzeugen 
15 ; D4 = Koordinate (vgl. Al) Open "I",#1,"LQG. PRG" 
16 ; Sendebyte L=Lof(#1) 
17 ; D5 = Zaehler L$=Input$(L,#1} 
13 ; D6 = Zaehler Close | 
19 ; D7 = Shift-Akkumulator L=Instr (L$,"NgqNaNq") ! 3 NOPs 
26 ; AB = Puffer-Anfang L$=Mid$(L$,L) 
2] Esc-Anfang L=Varptr (L$) 
22 ; Al = Koordinate (vgl. D4) Call L 
 - 
24 08 AE7I NOP :SIGNATUR 
25 962 4ETL NOP 
26 BB4 AETI NOP 
27 . 
28 ; REGISTER RETTEN UND DRUCKER-STATUS PRUEFEN 
29 
30 ds ABETFFCO START: MOVEM.L D®-D7/Aß-Al,-(SP) 
31 BBA 3F3CH008 MOVE.W #®,-(SP) :Ö=PARALLEL 
32 BE SF3CHdd8 MOVE,W #8,-(SP) ;8=BCOSTAT 
33 d12 4E4D TRAP +13 ;BIOS | 
34 B14 588F ADDQ.L #4,5P ;STACKKORREKT. 
35 B16 AABB TSTT DO ;PRINTER READY 
36 B18 SABdndAa2 BPL.L ENDE :öÖ=NEIN, -1=JA 
37 n 
38 ; BILDSCHIRM-ANFANGSADRESSE —--> D$ 
39 ’ 
Ad BIC 3F3CHBB2 MOVE.W #2,-(5P) ;DI=SCREENBASE| 
41 ß29 AEAE TRAP #14 :XBIOS 
42 022 548F ADDQ.L #2,5P : STACKKORREKT., 
43 5 
44 ; DRUCKERPUFFER LEEREN 
45 - 
46 924 183C900D MOVE.B #$0D,D4a ; RETURN 
47 028 61000098 BSR,L PRINT 
48 B2C 183C000A MOVE.B #$94A,D4 ; LINEFEED 
49 B3R 61PBRK9H BSR.L PRINT 
58 ; 
51 ; INIT MAKROZEILE (= 12 MIKROZEILEN) 
52 : 
53 934 7286 MOVEQ #9,D] : VPOS=d 
54 - 
55 ; INIT MAKROSPALTE (= 32 MIKROSPALTEN) 
56 : 5 
57 B36 7600 LOOPL: MOVEQ +9 ,D3 ; HPOS=® 
58 s 
59 ; GRAFIKMODUS EINSCHALTEN 
69 - 
61 938 AlFABBDE LEA ESC1S(PC),AB ;RELOKATIV 
62 B3Cc 7407 MOVEQ +8-1,D5 ;:8-ZAEHLER 
63 P3E 1818 ESC1: MOVE.B (AßB)+,D4A ;D4=ESC-BYTE 
64 HAB Ede BSR,.L PRINT 
65 844 5LCDFFFS DBF D5,ESC1 > 
66 : 
67 » MAKROSPALTENABSCHNITT 
68 } 
69 BA8 2401 LOOP2: MOVE.L D1,D2 :D2=VPOS-TEMP 
TB GAA TAÖB MOVEQ #+12-1,D5 ;12-ZAEHLER 
71 B4C A1FAdB92 LEA PUF1L{PC),A® ; RELOKATIYV 
72 - 
73 ; KOORDINATE = VPOS & 8% + HPOS + SCREENBASIS 
74 ; 
75 056 7850 LOOP3: MOVE.L +88,D4 :D4=88 
76 852 0802 MULU D2,D4 :D4=D2x86 
77 054 D883 ADD.L D3 ‚,D4 ; DA=DA+HPOS 
78 B56 DES$ ADD ,L Dß,D4 ;D4=D4+BASIS 
73 058 2244 MOVE,L D4,Al ;Al=KOORDINATE 
80 O5A 20D1 MOVE.L (Al), (Ad)+ :(Al) IN PUFI 
81 B5C 5242 ADDI.W +#],D2 :VPOS+1 
82 B5E 5SLCDFFFB DBF D5,LOOP3 en, 
83 : 
84 ; SENDEBYTES FUER DRUCK AUFBEREITEN 
85 : 
86 d62 TCIF MOVEQ +32-1,D6 ;32-ZAEHLER 
87 064 AlFADGTA DRUCK1: LEA PUF1{PC),A® ;RELOKATIY 
88 Ö68 TAÖB MOVEQ #12-1,D5 ;12-ZAEHLER 
89 ; 


92 B6A 
93 B6C 
94 ß6E 
95 B7O 
96 72 
97 074 
98 676 
99 H78 
189 B7A 


194 $7E 
105 d8® 
ls #82 
187 984 
108 86 
189 88 
11® 8A 
111 98C 
112 ö8E 
113 899 
114 992 
115 996 


119 89a 
128 89C 
121 dag 


125 ®A2 
126 ®BA6 
127 BA8 
128 BAA 
129 BAC 


135 dBB 
136 ®B4A 
137 0B8 


141 BC 
142 8C9 


144 
145 
146 
147 
148 
149 
158 
151 $c2 
152 $C6 
153 Scc 
154 ÖCE 
155 6D2 
156 ®D6 
157 9D8 
158 BDA 
159 DE 
168 
161 dEB 
162 
163 
164 
165 116 
166 111 
167 112 
168 113 
169 114 
176 115 
171 116 
172 117 
173 
174 
175 
176 118 
177 119 
178 11A 
179 11B 
188 


2410 
E392 
2982 
ABET 
E397 
44DF 
E359T7 
3888 
SICDFFEE 


TAB] 
2807 
EdSC 
EBSC 
613A 
2897 
EBSC 
6134 
2807 
6138 
SICDFFEC 
SICEFFCC 


5803 
BCBSHH5P 
66A6 


41FAQ974 
7AB3 
1818 
6116 
SlCDFFFA 


BSALBBAC 
ÖCA10198 
S6BÖFFTC 


ACDFASFF 
4E75 


ABSETFFCO 
B2BABRBBBAFF 
3Fß4 
SF3chBRg 
3F3CHBB3 
AEAD 

5C8F 
ACDFÖSFF 
AE75 


DRRHRn5H 


1B 
33 
18 
1B 
2A 
27 
dB 
85 


dD 
BA 
1B 
32 


; ZWEIMAL VERTIKAL DEHNEN 


DRUCK2Z: MOVE, 
ROXL, 
MOVE. 
MOVE. 
ROXL. 
MOVE. 
ROXL. 
ADD.L 
DBF 


J 


MOVEQ 


DRUCKS3: MOVE.L 


LSR.L 
LSR.L 
BSR.S 


MOVE.L 


LSR.L 
BSR.S 


MOVE.L 


BSR.S 
DBF 
DBF 


ee 


(AB) ‚DZ 
#1,D2 

D2, (AB) 
SR,-(SP) 
#1,D7 
(SP)+,CCR 
#1. Dr 

#4, AB 

D5, DRUCK2 


; ZWEIMAL HORIZONTAL DRUCKEN 


+2-1,D5 
D7,D4 
+8,D4 
+8,D4 
PRINT 
D7,D4 
+8,D4 
PRINT 
D7,D4 
PRINT 

D5, DRUCK3 
D6, DRUCK1 


; MAKROZEILE FERTIG? 


ADDQ.B 


CMP.B 
BNE.S 


+4,D3 
+80,D3 
LOOP2 


;2-ZAEHLER 


; LONG-LOAD 
;SHIFTEN 

; LONG-SAVE 
;EXTEND-SAVE 
1. sSHIET 

; EATEND-LOAD 
i& e SHIFT 

; ZEIGER+4 
> 


;HPOS+4 
:BEREITS 89? 


> 


; CR-LF SENDEN UND GRAFIK ABSTELLEN 


LEA 
MOVEQ 
ESC2: 
BSR.S 
DBF 


MOVE.B 


ESC2S{PC)},A® 
+4-1,D5 
(AB)+,D4 
PRINT 
D5,E5C2 


; LETZTE MAKROZEILE? 


;RELOKATIV 
;4-ZAEHLER 
; D4=ESC-BYTE 


ı—> 


; (MIKROZEILEN 499-497 IMMER LEER???) 


ADD.W 
CMP.W 
BNE 


4 


#12,Dl 
#468,D1 
LOOP1 


; REGISTER LADEN UND ENDE 


ENDE: 
RTS 


MOVEM.L 


:VPOS+12 
;BEREITS 468? 
> 


(SP)+,D@-D7/Aß-Al 


; ALS STAND-ALONE-PROGRAMM STATT RTS 


; MOVE.W 


; TRAP 


#B,-(SP) 
#] 


: BYTE AN DRUCKER SENDEN 


PRINT: 
AND.L 


MOVE.W 
MOVE .W 
MOVE.W 


TRAP 


ADDQ.L 
MOVEM.L 


RTS 


PUF]: DS.L 


F 


; ESC-SEQUENZ VORHER (8 BYTES) 


ESC15: DC. 


guuuuwwmw 


! 


; ESC-SEQUENZ NACHHER (4 BYTES) 


ESCZS: DC.B 
DC.B 
DC.B 
DC.B 


END 


; Ö=TERMINATE 
; GEMDOS 


MOVEM.L D®-D7/A@-ALl,-{SP) 


#$00@00ÖFF,D4 ;NUR LOW-BYTE 


D4,-(SP) 
#9,-(SP) 
#3,-(SP) 
#13 
+6,SP 


;:SENDEBYTE 


:Ö=PARALLEL 
;3=BCONOUT 


:BIÖS 
;STACKKORREKT., 


(SP)+,DO-D7/AB-Al 


12 


$1B 
633 
$18 
$1B 
$2A 
$27 
09 
595 


$öD 
$BA 
$1B 
$32 


;12%352 BITS 


‚ESC 

Bas 
‚24/189 
;ESC 

} ty 
:MODUS 39 
:LL 1289 
:HH 1288 


; RETURN 
SSR: 
‚ESC 
ED 
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BUCHHALTUNG 
mit BUCH 


Doppelte Buchführung, die auf 
Selbständige und Kleinunter- 
nehmer zugeschnitten ist: 


- 14 Tage frei zur Ansicht! 

- einfache und sichere 
Benutzerführung 

- Prüfsiegel »anwender- 
freundliche Software« 

- Betriebsübersicht, G&V 
Rechnung, Debitoren und 
Creditoren, Journal, Konten- 
blätter, Saldenliste 

- automatische Umsatzsteuer- 
verbuchung 

- das Programm hat eine Lohn- 
steueraußenprüfung des Fi- . 
nanzamtes in unserem Hau- 
se bestanden 


»Ein leistungsfähiges, leicht zu 
bedienendes Werkzeug...« 
(Testbericht PC-Soft, 7/85) 
»...halten wir dieses Finanz- 
buchhaltungsprogramm für 
ganz ausgezeichnet.« (Soft- 
waretestjahrbuch '85) 


660, — DM für Apple II + 
lle/llc und IBM-PC/XT/AT, 
Commodore PC 10 etc. 


Informationen bei 


RÖNTGEN SOFTWARE 


Simpert-Krämer-Str. 44, 
8909 Edelstetten, 
Tel. 08283/1463 





Erster aaa „little big“ Ableger 





für Apple Il/+/e, Basis 108 und compatible 






























Sicher. - Wir haben uns bei der Entwicklung u. Fer- 
tigstellung unserer Mega Ramcard Il? etwas Zeit 
gelassen, damit Sie jetzt auch Zeit gewinnen. 
Und das hat sich gelohnt! 

Die Tests, aber auch die mitgelieferten Ramdisk- 

_treiber-Programme für folgende Betriebssysteme, 

beweisen es: 


„ Apple DOS 3.3 

„» Diversi DOS 2-6/4-C 

„ Apple ProDOS 1.0.1, 1.1.1 

„ Apple Pascal 1.1 
Apple Pascal 1.2/64 K, 1.2/128 K 
Apple Pascal 1.3/64 K, 1.3/128 K 

» CP/M 2.2 für 
Microsoft Softcard, CP/M 2.20, 2.23 
Microsoft premium card, GP/M 2.26 
Microsoft Softcard Il, CP/M 2.28 


Sogar nach einem „Systemabsturz“ oder Betriebs- 
systemwechsel bleiben alle Dateien erhalten! 
Peripherieslot und Speicherkapazität werden auto- 
matisch erkannt, sodaß das lästige Eingeben ent- 
fällt. 

Mega Ramcard Il istmit den erphi-AFDC2/AFDC3- 
Controller vollständig kompatibel, u.v.m. 


Händleranfragen schriftlich erwünscht. 


Mega Ramcard Il, 1MByte bestückt + Software 
(s.o.) + deutsches Handbuch, Il/+/e 878,- 
Mega Ramcard Il, 256 K-RAM best. (bis 1 MB 
aufr.) + Software (s.o.) + dt. Hb., I/+/e 498,- 
Disk II-Siemens-Laufwerk im Geh.+ Kabel f. orig. + 
comp. Contr. geeignet, Il/+/e 298,- 
DSTESEHENSSRTNT ET NEE 

WERE 359,- 
Erphi-AFDC2-Controller + Autopatch Software 

+ deutsches Handbuch, Il/+/e 198,- 
Disk II-Philips Laufwerk 0. Geh., 2x 80 Track- 
640.KB f. AFDC2 0. 3 modifiziert, I/+/e 298,- 
STERN SUCHE HEUNGEE 
Erphi-AFDG3-Controller, I/+/e 898,- 


REPARATUREN an Apple + Compatiblen Geräten + Zubehör 
führt unser Spezialteam garantiert zuverlässig + besonders 
kostengünstig aus.. Sprechen Sie mit uns. 
Kostenvoranschlag auf Wunsch! 
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Nicht jeder kann und möchte an seinen Apple //-Rechner unser MEGA-CORE oder 
die MDB 10/20 anschließen. Gerade für diesen Personenkreis bietet sich das MEGA- 
BOARD als der alternative und preiswerte Einstieg zum komfortablen Festplattenbe- 








trieb an. Das Manual führt Sie zielsicher zu Ihren Wünschen: 
@ Fesiplattenbetrieb von 5-64 MBytes 
@ Betriebssystembereiche frei wählbar 


@ Booten von der Festplatte 


@ Betriebssysteme DOS, MS-DOS, CP/M, UCSD-Pascal, ProDOS 


menuegesteuert im Zugriff. 


Zum Lieferumfang gehört der Controller MEGA-BOARD, alle Kabel mit Steckern, 
Installationssoftware, das ausführliche Manual und auf Wunsch die Festplatte zum 


FRANK & BRITTING 


Elektronik Entwicklungs GmbH 
Lange Straße 4, 7529 Forst 
Telefon: 07251 /103068-69 
Telex: 7822452 fub d 


Die Harddiskcontroller-Spezialisten 


Tagespreis. 


Ein Produkt von: 





Ausgabe und 
Eingabe mi: 


TYPETERM® 


im Slot Ihres 


APPLE Il/lle/ligs 


Das bedeutet: Computer- 
textverarbeitung von der 
Schreibmaschinentastatur! 
Steckerfertig ohne Umbau. 


Die neue CE-550! 
mit TYPETERM DM 1.318,— 


TYPETERMN- DM 399,— 
Interface 

für alle BROTHER-Typenrad- 
schreibmaschinen ab AX-30 

bis EM-811 

(auch für Vorgängermodelle!) 
Paketpreis z.B.: 


EM-501 mit TYPETERM 
EM-511 mit TYPETERM DM 2332,— 
EM-701 mit TYPETERM DM 2388,— 


TYPETERM - ein starkes Interface für 
starke Maschinen! Alle Cursor- und Ctl- 
Befehle. 4k ROM auf der Karte für DOS, 
PRODOS, CP/M, PASCAL. 2 Zeichensätze 
verfügbar z. B. deutsch u. ASCIl. Alle 
Features: Hoch-/Tiefstellen, autom. Unter- 
streichen, var. Zeichen und Zeilenabst., 
autom. Papierzuführung usw. 


TYPETERM - ein Produkt von 


® 
interkom Kock & Mreches GmbH 
Postf., 3004 Isernhagen 4 


electronic Telefon 05139-87393 


DM 2056,— 


Ausgabe mit 


TYPETERM® 
JUNIOR 


im Slot Ihres 


APPLE Illle/ligs 


Paketpreis jetzt DM 799,-! 


Schreibmaschine AX-10 mit 
Interface TYPETERM JUNIOR, 
steckfertig. 


Die Zukunft heute 


TYPETERM JUNIOR mit AX-10 — unser 

besonders günstiges Gespann, ebenfalls 

steckfertig. Mit TYPETERM JUNIOR kann 

die AX-10 mehr. Sie wird zum vollwertigen 

Typenraddrucker für Ihren Apple: 

@ 3 verschiedene Schriftstärken 

@ Automatisches Unterstreichen 

@ 2 Zeichensätze z.B. deutsch u. ASCII 

@ 2 Zeichenabstände 

@ 2k ROM auf der Karte für Ausgabe unter 
DOS, PRODOS, CP/M u. PASCAL. 


TYPETERM JUNIOR - ein Produkt von 


o 
inferkom Kock & Mreches GmbH 
— —  —  ——————  Posttf., 3004 Isernhagen 4 


electronic Telefon 05139-87393 
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Neue Preise #2 


NEU: Jetzt mit aaa-Computer-Kredit r 

und bequemen monatlichen Raten! LEER/BESTÜCKT 
Industrie-Standard IBM-PC/XT+AT-compatible COMPUTER +Zubehör 
in Industrie-Qualität (X=XT, A=AT, XA=XT+AT) 
Mainboard XT-256, 8088 CPU, OK (bis 256K-on board, oder 
640 K mit Addr. auf Karte aufr.) + BIOS + 8 Slots, geprüft 79,--/227,-— 
Mainboard XT-256 mit 256 K-RAM, sonst. w.o., gepr. 317,-- 
Mainboard XT-640, 8088 CPU, OK (bis 640 K-on board) gepr. 89,--/237,-— 
Mainboard XT-640 w.o. jedoch 256 K-RAM best. + gepr. 297,-- 
Mainboard XT-640 w.o. jedoch 640 K - vollbest. und geprüft 407,-— 
Mainboard TURBO XT-640 -4,7/8 MHz, OK, best. + gepr. 99,--/276,-— 
Mainboard AT-IMB, 6/8 MHz, 80286 CPU, 16/24 bit (mit Sockel f. 80287) 
512K-RAM best.(bis1MB aufrüstb.)+BIOS+Uhr m.Akku+8 Slots,gepr.1229,— 
64KB-RAM-Chip-Aufrüstsatz (9 Stück) einzeln geprüft! X/A 32,-— 
256 KB-RAM-Chip-Aufrüstung (9 Stück) einzeln geprüft! X/A 69,-—- 
Disk-Controller gepr. (f. 2x360 KB-Drives), X 77, 
Disk-Controller gepr. (f. 4x360 KB- DNS NELE LEITER END TE BY -— 
Disk-Controller gepr. (f. 2x1,2 MB-Drives), X 229,- 
Disk-Controller gepr. (f. 2x1,2 MB-Drives, auch f. 360 K geeignet), A 169,-- 
Harddisk-Controller f. 2xHD, x 287,—— 
Harddisk+Floppy-Controller (1 HD+2DD) gepr., A 597,-- 
Monochrome Karte geprüft, YA 49,--/149,-- 
Monochrome Graph.+par.Print. Karte (Hercules comp.), X/A 
Color RGB + Video Graphikkarte+Lightpen-Ausgq,., gepr., X/A 
Parallel Printer-Karte gepr. 0. Kabel (Extra Kabel =49,-), X/A 
RS 232 Interface (2xRS 232, 1 davon bestückt), X/A 
RS 232 +par. Printer Karte gepr., X/A 
512K-RAM-Karte gepr. (OKB)(mit 64 KB-RAM bestückbar), X F 
512K-RAM-Karte gepr. (OKB)(mit 256 KB-RAM bestückbar-kurz), X 
3 MB-RAM-Erweiterungsk. gepr. (OK), (m.256 K-RAM bestückbar), A 317, ui) 
2,5 MB-Multifunktionskarte, OK, +RS 232,+par. Printer, gepr., A 397,-- 
384K-Multifunktionskarte, RS 232, par. Printer. Interf., Game/Joystick Port, 
Real Time Clock gepuff.,OK-+RAM-Disk/Spooler/Uhr Softw., X 55,--/189,-— 
Disk Multi /O Karte (f. 2x360 K-Drive, 2xRS 232, 1x par. Printer Int., 
Game/Joystick Port, Real Time Clock/Kalender gepuff.), X 59,--/169,—— 
Clock Karte gepuffert, geprüft, X 69,-- 
//O Pius-ll-Karte, 2xRS 232, (1xbest.), par. Printer-Interf., Game /Joystick 
Port, Real Time Clock gepuffert, geprüft, X 179,-— 
V/O Plus-Karte, 2xRS 232 (1xbest.), par. Printer-Interf., 
Game/Joystick Port, geprüft, A 159,-- 
EGA-comp. Enhanced Graphic Adapter Karte, mit 256 K-RAM- 
Bildschirmspeicher, Monochrome-Color Graphik (640x350 
Punkte - 16 Farben) +par. Printer Int., voll best.+gepr., X/A 69,--/495,—— 
AD/DA-Wandler, 12 bit, 16/1, X/A 295,-— 
AD/DA-Wandler, 14 bit, 16/2, X/A 475,—— 
Option Board compatible Karte incl. Disk+Manual, (zum sichern 
kopiergeschützter Disketten, Kopierschutz wird mitübertragen), YA 347,—— 
Eprom Writer, (f. 4 St. 2716/32/64/128/256/512 gleichzeitig), X/A 429,-— 
Prototype/Lochraster Leerkarte, durchkontaktiert, lang 64,-- 
Profi-Funktionstastatur ASCII + 15er Block ab 195,—— /dt. ab 225, -- 
135W/150W-Netzteil mit eingeb. Ventilator, kurzschlußf., X 195,—/215,-—- 
200W-Netzteil mit eing. Ventilator, kurzschlußfest, A 375,-— 
360KB-DiskdriveSlimline(TrackAccessTime <4mS),R/Wgepr., X/A 277,—— 
720KB-Diskdrive Slimline, 2x80 Tr. (TAT <2mS), R/W gepr., X/A 337,-- 
1,2MB-Diskdrive Slimline, 2x80 Tr. (TAT <2mS), R/W gepr., X/A 347,—- 
21 MB-NEC-Harddisk, X/A 979,-- Micro Science, X/A 849,-— 
21 MB-NEC-HD+HD-Contr., X 1.285,-— MS+HD-Contr,X 1.155,—— 
44 MB-NEC-Hardisk, X/A 1.957,-- 44 MB-NEC+DTC,X 2.349,-— 
21 MB, Harddisk+Controller in einem, anschlußfertig, X 1.298,—— 
Joystick f. IBM + Compatible, X/A 58,— 
Maus incl. Software (MOUSE Systems comp.), X/A 158,— 
Met.-Gehäuse aufkl. (Pl.f.4-Einb.-Drives), solide Ausf., X=198,--/ A=298,-— 
+++PC/XT+AT - KOMPLETT-SYSTEME AUFGEBAUT UND GEPRÜFT+++ 
XT-640, 8088 CPU (incl. Boot-Eprom) 256K-Ram incl. Lautsprecher, im 
IBM-look-like Met.-Gehäuse +Profi-Fkt. Tast.+135 W-Netzt. gepr. 777,— 
XT-640,w.o.+Contr.+360KBDrive+Color RGB+Vid. Graphik-Karte 987,—— 
XT-640, w.o. jedoch statt Color mit Monochrome Karte 997,-- 
XT-640, w.o. jedoch mit Monochrome-Graphik-Printer-Karte 1.017,-— 
XT-640, 256 K-RAM+360 KB Drive+Disk Multi /O+Color-Gr.-Karte 1.097,-— 
XT-640, 256 K-RAM+360 KB Drive+Color RGB+Video-Graphik- 
Karte+21 MB-Festplatte+Controller 2.097, 
AT-1MB, 6/8 MHz, 80286 CPU, 512 K-RAM, im IBM-Iook-like Met.-Gehäuse+ 
Profi-Fkt.Tast+200W-Netzt.+Color Graph.-Karte+1,2MB-Drive, gepr. 2.295,— 
AT-1MB, w.o.+21MB-Harddisk gepr. 3.785,—— 
Aufpreis für Turbo XT-640 -4,7/8 MHZ umschaltbares Board, X 39,—— 
Aufpreis für XT-640 M-board mit 640 K von 256 auf 640 K-RAM,X 119,— 
Aufpreis f. EGA anstatt Color Graph.-Karte, X/A 475,—— 
MS-DOS 3.1 Diskette incl. Manual, X/A 159,-—— 
MS-DOS+GW-Basic 3.2 sowie 4 dt. orig. Microsoft Hb. (Aufpreis in 
Verbindung mit Systemkauf), X/A a 1: 
8087-Arithmetik-Prozessor, 5 MHz, X =327,-- 80287,A 869,-- 
V 20-Prozessor, 8 MHz, X 37, 


PC 10-11 512 K-RAM, AGA-Karte, dt. Tast.+Laufw.+20 MB-Festplatte 
+Contr.+Monitor 3.8 
AMIGA-Commodore, 512 K-RAM 


APPLE-BUS COMPUTERPLATINEN + PERIPHERIE 
M-board II 48K, gesockelt, vollbest. + gepr. 
M-board Il 64K, gesockelt, vollbest. + gepr. 
M-board II 64K + Z80 CPU, gesockelt, vollbest. + gepr. 
M-board Ile 64K vollbestückt + gepr. 
Superstarkes Netzteil — kurzschlußfest 5A=115,—— b.z.w. 7A= 
Entwicklungslochraster-Leerplatine durchkontaktiert 27,—— 
16K- -Speicher- Karte geprüft 18,95/ 55,—— 
APPLE orig. 16K-Language Karte gepr. 98,-- 
Z-80 CPU-Karte geprüft (CP/M Vol. I.+1l Manual dafür=69,--) 18,95/ 64,-— 
Controller DOS 3.3-Karte geprüft . 
Auto-Controller DOS 3.2/3.3-Karte gepr. 
Erphi AFDC 2 Controller + Autopatch Softw.+Handbuch, gepr. 
Parallel-Drucker-Karte geprüft (Extra Kabel = 45,-—) 18, . 
Par.-Drucker Karte-Grappler comp. gepr. (Extra Kabel=45,--) 27,--/169,—— 
8bit par. Int. + 64K-Buffer + Kabel gepr. (Grappler comp.) 39,--/299,-- 
Seriell-Interface-Karte V24 geprüft 18,95/ 88,-- 
Super-Seriell-Interface Karte gepr. 34,--/169,-- 
APPLE-Original Super-Seriell-Interface gepr. PA 
80-Zeichen/24-Zeilen-Karte geprüft 18,95/119,—— 
80Z/24Z-Karte + Softswitch-Schalter, gestochen scharf, gepr. Ber --/127,-- 
802/24Z-Softwitch Karte gepr. für lle 
802/24Z+64K-Ram +Softsw.-Karte best.+gepr. f. Ile 
IEEE-488 Int. Karte gepr. (Extra Kabel=45,-—) 
PAL-Modulator/Color-Karte+UHF Modulator, geprüft 
RGB-Color Karte gepr., (nur f. Il+) 18, ‚95/1 29,-- 
128K-Speicher-Leerkarte + Software + Manual 99,-—- 
128K-Speicher-Karte + Software+Manual, geprüft 29,--/255,—— 
Mega Ramcard Il, 256 KB best.+Software+dt. Hb., (bis1MBaufr.) 498,—- 
Mega Ramcard Il, 1 MB best.+Software+dt. Hb., gepr. 878,—- 
EPROM-Burner (2716/32/64) geprüft 24,--/109,-- 
6522-VIA Karte geprüft 24,--/135,-- 
Clock Karte +Software-+Manual, geprüft 24,--/ 94,- 
Speech Karte+Software+Manual, geprüft 18,95/ 53,—— 
NIC BERGES NTEIGHANERTEIK GT SA ARe LT elgtlı: 18,95/ 59,-— 
AD/DA-8Bit Karte+Software+ Manual, gepr. 29,--/269,-- 
UHF/TV-Modulator universell 
Lüfter anclipsha" '??0 V) 
APOLLO//(48K) + UHF-Mod. + Gr/Kl vollbest. + gepr. 
APOLLO//(48K) + Disk II F + Contr. + 12”-Monitor 
APOLLO//A (48K) + Gr/Kl + 15er-Tastatur vollbest. + gepr. 
APOLLO// ASKF (48K) vollbest. + gepr. sep.Keyboard + Gr/Kl + 
15er-Block mit Funkt.-Tasten im „IBM-look like” Gehäuse 
Aufpreis f.o. Systeme von 48K zu 64K 
Aufpreis von 48K zu 64K+Z80 CPU 
Apollo Ile (64K) vollbest. und geprüft 
Apollo Ile (64K) +802/24Z-Karte gepr. 
Apollo Ile (128K) +802/24Z-Karte geprüft 
Applle Ile (64K) +15er-Tastatur vollbestückt und geprüft 
Apollo Ile ASKF (64 K) vollbestückt und geprüft 
Apollo Ile (64K) +Disk II F+Contr.+12" Monitor 


APPLE Ile 128K+802/24Z Karte +Softw. 1.598, 
Disk-Drives voll APPLE 11,100%ig compatibel--R/Wgeprüft+Track@Sensor: 
Disk//+Contr. + Kabel Dos 3.3 (Siemens) im Geh. 359,-— 
Disk//(Siemens) im Geh. + Kabel 298,—— 
Disk//F-HS (High Speed 1/2 Höhe) im Gehäuse +Contr.+Kabel 379,-— 
Disk//F-HS (High Speed 1/2 Höhe) im Geh.+Kabel (Track Ac.<2mS) 318,—— 
Disk//F-HS-80 Track im Gehäuse + Kabel f. orig. Contr. geeignet 389,-— 
Disk//F-HS-80 w.o. + Contr. + DOS 3.3 + CP/M Patch-Softw. 489,-- 
Disk 1l-2x80 Track 640KB f. Erphi Controller modifiziert, 0. Gehäuse 299,-— 
Erphi DuoDisk 1,2 MByte im Gehäuse + Erphi-AFDC 3-Contr., gepr._ 898,— 


APPLESOFT + Tutorial + Reference Manual engl. 
APPLE-DOS 3.3 Manual engl. = 25,--/Handbuch dt. 
APPLE-Pascal Reference + Operating Manual engl. 
APPLE-Fortran Manual engl. 

CP/M-Softcard Vol. | + Il, Manual engl. 


Z80 Karte gepr. f. APPLE//c + RAM-Disk-Software + Hb. 
Macintosh Umrüstung von 128K auf 512K 


EPSON FX 85F/T+, 8bit/parallel 160 Z/S. NLQ + IBM comp. 
EPSON FX 105+, 8bit/parallel 15” sonst w.o. 

EPSON LQ-800, 24 Nadel, 180 Z/Sec. NLQ+IBM comp. 
EPSON LQ-1000, wie 800 breite Aust. 

EPSON EX 800, 

EPSON Traktoraufsatz für FX 80 + FX 85 
APPLE/EPSON-Drucker Graphic-Interface + Kabel 

MX 80/82, FX/RX 80, FX 85 Spezialfarbband-Kassette 


BROTHER-Typenraddr. HR 15XL 8bit/par. neuestes Modell 


Wir führen verschiedene Monitore von Zenith, Phillips, NEC, COGA und 
Sanyo mit Video - TTL (IBM Komp.) oder Coloreingang. Sowie umfangreiche 
Computer-Literatur (über 500 versch. Titel) — Bitte Preisliste anfordern! — 


Disketten in Box + Aufkleber I. Wahl, 10er Pack/100er Pack./ Stückpreis: 
5%" BASF 3M FUJI y.\ 7.\ 
MAGNE- 
aule> 


1X,SS/SD 2,79/ 2,59 

1D,SS/DD 2,89/ 2,69 2,88/ 2,78 4,27/ 3,97 -,980/-,936 -,885/-,835 
2D,DS/DD 3,49/ 3,29 3,88/ 3,68 5,87/ 5,47 1,180/-,996 1,085/-,895 
1D/96TPi 3,89/ 3,59 4,88/ 4,68 

2D/96TPi 4,39/ 4,19 4,68/ 4,38 7,87/ 7,67 

2HD/1.2MB 7,59/ 7,29 7,98/ 7,58 9,87/ 9,57 


1X,Hard 4,29/ 4,19 BER 


:% - 

1X, SS/SD 4,49/ 4,39 6,68/ 6,48 6,97/ 6,67 Tate 

1D,SS/DD 4,79/ 4,59 8,58/ 8,28 

2D,DS/DD 6,49/ 5,99 9,88/ 9,58 10,17/ 9,77 

1X, Hard 4,49/ 4,39 6,68/ 6,48 

31%” 

Einseitig 4,69/ 4,49 5,88/ 5,58 7,67/ 7,17 

Zweiseitig 6,19/ 5,89 7,28/ 6,88 9,17/ 8,57 
" Disketten-Archivbox für 10 Disks (1 St./10 St.) 4,75/43,50 
" Disk-Karteikasten Kunststoff (ca. 80 Disk) 26,50 

/" Disk-Karteikasten Kunststoff (ca. 80 Disk) Rauchglas 

54” Disk-K.K.Rauchglas, abschließb. (f. ca. 80-100 Disks) 

2000 Bl. Tabpapier (24 cm x 12” einf.) weiß oder grün/weiß perf. 

4000 Et.-Aufkl. doppelr. (107 x 36 mm auf 240 x 12” perf. Trägerp.) 

4000 Etik.-Aufkl. einreih. (107 x 36 mm auf 125 x 12” perf. Träg.) 


OSZILLOSCOPE HAMEG ab Lager 
Bei Vorauszahlung frei Empfangsstation unversichert in der BRD, ausgenom- 
men Papier und Etiketten, sonst N.N. + V.S. ab DM 30,—— 
Öffnungszeiten: Mo, Di, Do, Fr v. 10-18 h, Miu. Sa v. 10-14 h, la Sav. 10-18 h. 
Telef. Best.: Mo, Di, Do, Fr von 10-19 h, Mi u. Sa wie Öffnungszeiten. 
SZ TEST ÜNTCHCHNEIETEREIN ENTER EIRUREETERLCHKEETE CHE NLeH) 
unsere eigene Service-Werkstatt. 
REPARATUREN an Apple + compatiblen Geräten + Zubehör führt unser 
Spezialistenteam garantiert zuverlässig + besonders kostengünstig aus. 
Sprechen sie mit uns. Kostenvorschlag auf Wunsch! 


R, A-Xeilgejalle a 
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1. Ausgangslage 


Texte können mit Hilfe von Mikrocompu- 
tern und angeschlossenen Druckern in 
vielfacher Weise gestaltet werden. Schrift- 
zeichen sind jedoch nur begrenzt als Mitte! 
des Ausdrucks einsetzbar, da ihr Punktra- 
ster in Festwertspeichern abgelegt ist. 
Dieser Sachverhalt wird besonders deut- 
lich, wenn bestimmte Zeichen benötigt 
werden, die in dem standardmäßig verfüg- 
baren Zeichensatz nicht enthalten sind 
(z.B. der griechische Buchstabe Pi). Der 
Matrixdrucker FX-80 von Epson bietet die 
Möglichkeit, Zeichen nach eigenen Vor- 
stellungen zu definieren. In Verbindung 
mit einem Apple Il wird beispielhaft ein 
Weg dazu aufgezeigt. Zwei Programme 
unterstützen das Vorgehen. Die einzelnen 
Schritte lassen sich wie folgt skizzieren: 

— Drucker vorbereiten 

— Gesamten Zeichensatz des Druckers in 
dessen RAM-Bereich kopieren 

— Einen nationalen Zeichensatz als Träger 
der geänderten Zeichen bestimmen 

— Zeichen redefinieren 

— Zeichensatz aktivieren 

Die einzelnen Schritte sollen im folgenden 
näher erläutert werden. 


2. Vorbereitung des Druckers 


Der Drucker verfügt über einen RAM-Be- 
reich, der wahlweise als Pufferspeicher 
dienen oder einen Zeichensatz aufneh- 
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men kann; ein Schalter bestimmt die je- 
weilige Funktion. Für den hier verfolgten 
Zweck ist der DIP-Schalter 4 des Schal- 
terbausteins 1 auf „OFF“ zu stellen. (Im 
Handbuch zum Drucker wird die Lage der 
Schalter beschrieben.) Dadurch wird die 
hardwaremäßige Voraussetzung geschaf- 
fen, um mit der Programmierung eigener 
Zeichen beginnen zu können. : 


3. Zeichensatz kopieren 


Der gesamte Zeichensatz wird durch 
Übertragen der Bytefolge 1B,3A,00,00,00 
an den FX-80 aus einem ROM des Druk- 
kers in dessen RAM-Bereich kopiert (s. 
Programm FX80.INIT, Zeile 41). Dieser 
Vorgang wird mit „download“ bezeichnet. 


4. Nationaler Zeichensatz 


Als nächstes ist ein nationaler Zeichensatz 
zu bestimmen, dessen Zeichen durch 
selbstdefinierte Zeichen ersetzt werden 
sollen. In unserem Fall wird der deutsche 
Zeichensatz durch Übertragen der 
Bytefolge gemäß Programm FX80.INIT, 
Zeile 45 gewählt. Die Bedeutung der ein- 
zeinen Bytes der Folge 1B,52,02 sei bei- 
spielhaft erläutert: 

1B kennzeichnet den Beginn eines Steu- 
erbefehls an den Drucker. 

o2 bedeutet „Wähle den Zeichensatz, der 


Zeichensatz für den 
Epson FX-80 





dem nachfolgenden Byte entspricht“. Da- 
bei spezifiziert 02 den deutschen Zeichen- 
salz. 

Weitere Angaben dazu sind dem Drucker- 
handbuch unter der Kurzbezeichnung 
„eSC R" zu entnehmen. 


5. Exkurs: Zeichenaufbau 


Bei der Definition eigener Zeichen ist zu 
beachten, daß die verschiedenen nationa- 
len Zeichensätze über einen gemeinsa- 
men Zeichenvorrat verfügen. Die in allen 
Sätzen vorkommenden Zeichen sind des- 
halb im RAM-Bereich auch nur einfach 
vorhanden. Daraus ergibt sich, daß u.U. 
die Zeichensätze im RAM- und im ROM- 
Bereich wechselweise genutzt werden 
müßten, wenn der gemeinsame Zeichen- 
vorrat geändert würde. Die Bytefolgen, die 
die Umschaltung zwischen den Zeichen- 
sätzen bewirken, können nicht ohne wei- 
teres in einen Text eingefügt werden, da 
für das steuernde Byte IB kein Zeichen 
definiert ist. Textverarbeitungsprogramme, 
z.B. Wordstar, können jedoch entspre- 
chend konfiguriert werden. Es wird deut- 
lich, daß die Zeichen, die redefiniert wer- 
den sollen, wohlüberlegt zu bestimmen 
sind. 


Bevor wir mit der Definition von Zeichen 
beginnen, müssen wir uns noch Klarheit 
über den technisch vorgegebenen Gestal- 
tungsrahmen verschaffen. Die fest defi- 
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nierten Zeichen des FX-80 werden in ei- 
nem Raster von 5 x 7 Punkten (Breite x 
Höhe) gedruckt. Der FX-80 verfügt aber 
über neun senkrecht angeordnete Druck- 
nadeln. Die oberen sieben Nadeln werden 
für Zeichen ohne Unterlängen und die un- 
teren sieben für Zeichen mit Unterlängen 
genutzt. Mit einem Byte können jedoch 
gleichzeitig acht Drucknadeln angesteuert 
werden. Von dieser Möglichkeit wird in der 
Praxis kein Gebrauch gemacht. Die beige- 
fügten Programme schließen sogar die 
gleichzeitige Betätigung von acht Druck- 
nadeln aus, da ein Byte mit dem Inhalt 
„FF” das Ende der Tabelle kennzeichnet, 
die zum Programm FX80.INIT gehört. 

Für die Breite der Druckzeichen (fünf Ra- 
sterpunkte) stehen bei der Definition zehn 
Positionen (s. Abb. 1) zur Verfügung. Zwi- 
schen horizontal benachbarten Punkten 
soll jeweils eine Position frei bleiben, um 
ein einwandfreies Druckbild in der propor- 
tionalen Betriebsart zu gewährleisten. Auf 
diese Besonderheit soll hier jedoch nicht 
weiter eingegangen werden, 





use All 
Abb. 1 


Zusammengefaßt folgt für unsere Betrach- 
tung, daß wir Zeichen in einem Druckra- 
ster von 5 x 8 Punkten (Breite x Höhe) 
definieren können und in der Horizontalen 
begrenzt in der Lage sind, halbe Punktab- 
stände zu realisieren. 


6. Zeichen redefinieren 


Als nächste Frage ist zu klären, wie Posi- 
tionen einzelner Punkte unserer Zeichen 
in den RAM-Bereich des Druckers einge- 
geben werden können, um die dort bereits 
vorhandenen zu ersetzen. Die Antwort 
darauf ist einfach: Jeder Spalte der Defini- 
tionsmatrix (s. Abb. 1) entspricht ein Byte, 
das von oben (MSB) nach unten (LSB) zu 
lesen ist. Die acht Positionen in jeder Spal- 
te bezeichnen die einzelnen Bits mit den 
hexadezimalen Werten von 80, 40, 20, 10, 
8, 4, 2 und 1. Die zehn Bytes, die ein 
Zeichen definieren, sind — links beginnend 
— an den Drucker zu übertragen. 

Damit ist die Zeichendefinition aber noch 
nicht vollständig. Es fehlt die Anweisung 
an den FX-80, ob das jeweilige Zeichen 
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mit den oberen oder mit den unteren acht 
Nadeln gedruckt werden soll. Dazu wird 
der Zeichendefinition ein Byte vorange- 
stellt, das das sog. Attribut enthält. Für 
unsere Zwecke nimmt es den Wert „8B" 
für die oberen Nadeln und „OB“ für die 
unteren 8 Nadeln an. Das Attribut gibt 
auch Auskunft über die Breite und die 
Lage eines Zeichens, bezogen auf die 
zehn möglichen horizontalen Positionen. 
Wir nutzen vereinfachend alle zehn Spal- 
ten und kennzeichnen die unbesetzten 
durch ein Byte mit dem Inhalt „OO“. 
Unsere Zeichendefinition bedarf noch ei- 
ner Ergänzung: Der bisher festgelegten 
Folge von elf Bytes ist noch ein zwölftes 
anzufügen, quasi als Schlußzeichen, das 
stets den Wert Null trägt. Wir wissen nun, 
daß ein neues Zeichen durch Übertragen 
von zwölf Bytes an den Drucker definiert 
werden kann. 


Endlich können wir das erste Zeichen 
selbst definieren. Als Beispiel sol! der 
Buchstabe „Umlaut-u“ dienen, der sich im 
Originalzeichensatz kaum von seinem 
groß geschriebenen Äquivalent unter- 
scheidet. Abb. 1 zeigt den neuen Buchsta- 
ben In der Definitionsmatrix, deren Spalten 
die zehn Bytes und deren Zeilen die ein- 
zelnen Positionen im jeweiligen Byte (d.h. 
die Bits) darstellen. Links am Rand sind 
die Wertigkeiten der einzelnen Bits ver- 
merkt. Ergänzt um das Attribut und das 
„Schlußzeichen“ ergibt sich für unsere 
erste „Neuschöpfung“ die Bytefolge 
„8B,00,1C,42,00,02,00,42,10,02,00"; sie 
ist im Programm 1 ab Zeile 50 enthalten. 
Bevor wir diese Bytefolge an den Drucker 
senden, müssen wir noch spezifizieren, 
welches Zeichen im RAM-Bereich durch 
das neudefinierte ersetzt werden soll. Da- 
zu werden dem Drucker Steuerzeichen 
(1B,26,00) und zweimal der hexadezimale 
Wert des zu ändernden Zeichens {in unse- 
rem Fall 7D) übermittelt (s. FX80.INIT, Zei- 
le 49). 


7. Zeichensatz aktivieren 


Der in den RAM-Bereich kopierte und mo- 
difizierte Zeichensatz muß aktiviert wer- 
den, damit er genutzt werden kann. Das 
erfolgt durch die Bytefolge „1B,25,01,00“ 
(s. FX80.INIT, Zeile 85). Danach arbeitet 
der Drucker mit dem modifizierten Zei- 
chensatz. 


8. FX80.INIT 


Dieses Programm enthält sechs redefi- 
nierte Zeichen. Es verbessert die Darstel- 
lung vorhandener Zeichen. Das Programm 
bildet aber auch die Basis für den nachfol- 
gend beschriebenen Zeicheneditor. 
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9. FX80.PATCHER 


Das bisher beschriebene Vorgehen ist 
recht mühsam. Das Applesoft-Programm 
FX80.PATCHER erleichtert die Bewälti- 
gung der Aufgabenstellung erheblich, in- 
dem es nicht nur die Definition neuer 
Zeichen wirksam unterstützt, sondern es 
zugleich ermöglicht, die Tabelle von 
FX80.INIT mühelos zu erweitern, zu ver- 
kürzen oder in Teilen zu ändern. 
FX80.PATCHER geht davon aus, daß das 
Maschinenprogramm unter dem Namen 
„FX80.INIT" abgespeichert ist. 


FX80.PATCHER 
Funktionen: 

— Editieren: Analyse des Aufbaus redefi- 
nierter Zeichen, die in FX80.INIT enthalten 
sind, und deren Änderung. 

— Redefinieren: Bestimmen des zu än- 
dernden Zeichensatzes sowie Erstellen 
neuer Zeichen. 

— Löschen: Entfernen redefinierter Zei- 
chen aus FX80.INIT. 

— Abbrechen: Verlassen des Programms, 
ohne daß FX80.INIT zurückgeschrieben 
wird. 

— Beenden: Beenden des Programms; 
FX80.INIT wird bei erfolgter Änderung auf 
Diskette geschrieben. 


übernimmt folgende 


Das Programm befreit Sie von Rechenauf- 
gaben. Innerhalb einer Matrix können Sie 
am Bildschirm einzelne Punkte des ange- 
strebten Druckmusters setzen. Der Cursor 
wird dazu mit den Tasten „I, J, K, M“ 
bewegt. Die Programmlogik stellt sicher, 
daß nur bis zu sieben Drucknadeln aus 
dem Bereich der oberen oder der unteren 
Nadeln angesteuert werden. Das Pro- 
gramm wurde in Applesoft-BASIC ge- 
schrieben, damit weitergehende Wünsche 
an den Editor leicht realisiert werden kön- 
nen. Die modulare Struktur unterstützt ei- 
ne Erweiterung. Die ausführliche Doku- 
mentation der Konstanten, Variablen und 
String-Definitionen erleichtert das Vor- 
gehen. 


Für die praktische Anwendung ist noch 
anzumerken, daß man mit Hilfe von 
FX80.INIT den FX-80 vor Aufnahme einer 
Druckarbeit oder vor dem Laden eines 
Textverarbeitungsprogramms _ initialisiert. 
Der Drucker arbeitet danach wie gewöhn- 
lich mit der Ausnahme, daß der Pufferspei- 
cher nicht verfügbar ist. 


Und nun viel Erfolg bei der Gestaltung 
Ihrer Zeichen. Bedenken Sie, daß mit die- 
ser Arbeit nur ein Einstieg vermittelt wer- 
den sollte. Die Möglichkeiten Ihres FX-80 
reichen noch weiter. 
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Kurzhinweise 
1. Zweck: 


Gestaltung eigener Zeichensätze für FX80 


2. Konfiguration: 
II+/e/c; DOS 3.3 


3. Test: 

RUN FX80.PATCHER 

Wenn Zeichensatz fertig erstellt ist 
BRUN FX80.INIT 

4. Ssammeldisk: 

FX80.PATCHER 

T.FX80.INIT (Big-Mac-Quelltext) 
FX80.INIT (Objektcode) 


FX80.PATCHER 


1Pdd REM PATCHER FUER FX88-INIT 

1885 : 

1818 REMZEICHENEDITOR 

1815 : 

1628 GOSUB 1748: REM INITIALISIEREN 

1625 GOTO 1299: REM MENUESTEUERUNG 

1039 : 

1835 REM TASTATURABFRAGE 

1849 : 

1645 POKE KSTRB,® 

1058 HVAR = PEEK (KEYBD}: IF HVAR 
< 128 THEN 195% 

1855 HVAR = HVAR - 128: RETURN 

1066 : 

1065 REM CURSOR STEUERUNG 

1978 : 

1875 IVAR = 5:JVAR = 4 

1080 POKE SHOW(IVAR,JVAR),171 

1885 GOSUB 1835: ONERR GOTO 1995 


1098 ON (HVAR — 72) GOTO 1125,1145,1165, 


1265,1185 

1895 POKE 216,9 

1188 IF HVAR = 83 THEN 1235 

1185 IF HVAR = 65 THEN GOSUB 1955: 
EDITIEREN = ®: GOTO 1298: 
REM ABBRECHEN 

1110 IF HVAR = 69 THEN 1269 

1115 GOTO 1988 

1128 : 

1125 IF JVAR = 0G THEN 1889: REM UP 

1138 POKE SHOW(IVAR,JVAR), 
BIT(IVAR, JVAR) 

1135 JVAR = JVAR - 1: GOTO 1989 

1149 : 

1145 IF IVAR = Ö THEN 1ß88: 

1158 POKE SHOW(IVAR,JVAR), 
BIT{IVAR,JVAR) 

1155 IVAR = IVAR - 1: GOTO 1989 

1168 : 

1165 IF IVAR = 9 THEN 1986: 

1178 POKE SHOW(IVAR,JVAR), 
BIT({IVAR,JVAR) 

1175 IVAR = IVAR + 1: GOTO 1P8ß 

1189 : 

1185 IF JVAR = UG THEN 3886: 

1198 POKE SHOW(IVAR,JVAR), 
BIT(IVAR,JVAR) 

1195 JVAR = JVAR + 1: GOTO 1P8B 

1289 : 


REM LEFT 


REM RIGHT 


REM DOWN 


1285 BIT(IVAR,JVAR) = 16%: REM LOESCHEN 


1218 POKE SHOW(IVAR,JVAR), 169 
1215 IF JVAR = Ö THEN 29 = 28 - 
IF ZB <= ® THEN ZB = 9:UG 
1228 IF JVAR = 8 THEN 28 = 28 - 
IF Z8 <= ß THEN 28 = 9:06 
1225 GOTO 198 
1238 : 
1235 IF JVAR 
UG=7 
1248 IF JVAR 
06 =1 
1245 BIT(IVAR,JVAR) = 170: REM SETZEN 
1250 POKE SHOW(IVAR,JVAR), 178: 


ö THEN ZB = 29 + 1: 


8 THEN 28 25 #1: 
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(kein ProDOS bei 
FX80.PATCH; ProDOS möglich bei ferti- 
gem FX80.INIT); Epson FX-80; Parallel- 
schnittstelle mit CO90/C1C1-Protokoll 








GOTO 185 
REM EINGEBEN 


28 = 6: Z8 = B: IF EDITIEREN 

= 1 THEN 1715 

GOSUB 146 

GOSUB 1995: GOSUB 2285: GOTO 1385 


REM MENUE STEUERUNG 


EDITIEREN = Ö 

POKE 1977,127: GOSUB 1935 

IF CHR$ (HVAR) = "A" THEN 29085 
IF CHR$ (HVAR) = "B" THEN 2875 
IF CHR$ (HVAR) = "E" THEN 

POKE 1977,169: GOTO 167 

IF CHR$ {HVAR) = "L" THEN 

POKE 1977,169: GOSUB 147 

IF CHR$ {HVAR) = "R" THEN 

POKE 1977,166: GOTO 1345 

GOTO 1385 


REM REDEFINIEREN 


0G = $: UG = 8: ZPSN = 1232: 

UNI$ = M3$: GOSUB 153ß: 

POKE ZPSN, 127 

GOSUB 1835: IF HVAR < 48 THEN 1369 
IF HVAR > 56 THEN 1369 

POKE ZPSN, (128 + HVAR): 

STZ = HVAR + 128 

ZPSN = 1184: UNI$ = M2$: GOSUB 153: 
POKE ZPSN,127 

GOSUB 1835: CH = 128 + HVAR: 

POKE ZPSN,CH: CLEAN = FRE (9) 
GOSUB 1565: IF GEFUNDEN = 1 

THEN GOSUB 2385: GOTO 13#5 

GOSUB 2245: GOTO 1965 


REM BIT-MATRIX-—->FKETTE% 


MOD = 1: POKE SHOW{IVAR,JVAR), 169: 
REM CURSOR LOESCHEN 

FKETTEZ(6) = 139: REM ARGUMENT 
IF 0G = 1 THEN FKETTEZ(6) = 11 
FOR IVAR = ® TO 9 

HVAR = 6: KVAR = 6: NVAR = 1 
FOR ZAEHLER = UG TO 0G STEP - 1 
IF BIT{IVAR,ZAEHLER) = 179 

THEN HVAR = HVAR + NVAR 
BIT(IVAR,ZAEHLER) = 16ß: 

POKE SHOW(IVAR, ZAEHLER) , 16® 
KVAR = KVAR + 1: NVAR = 

2 ? KVAR: NEXT 

IF HVAR = 255 THEN GOSUB 2285: 
IVAR = 19: NEXT: POP: GOTO 13ß5 
FKETTEZ(7 + IVAR) = HVAR: 

NEXT: RETURN 


REM LOESCHEN 


ZPSN = 1186: UNI$ = M2$: GOSUB 1539 
POKE ZPSN, 127: REM ZEICHEN 7? 

GOSUB 1935: POKE ZPSN, (128 + HVAR) 
GOSUB 1565: REM ZEICHENSUCHEN 

IF GEFUNDEN = @ THEN 1528 

GOSUB 1699: REM CODE VERSCHIEBEN 
ZPSN = ZBEG:IVAR = LEN (ZEICHEN): 
GOSUB 1649 

ZPSN = ZBEG:ZEICHEN$ = "": 

GOSUB 1819 

GOSUB 1858: REM ZEICHEN DARSTELLEN 
GOSUB 2319: RETURN 


REM ZEILE SCHREIBEN 


FOR ZAEHLER = 1 TO LEN (UNI$} 

NVAR = ASC (MID$ {UNI$, ZAEHLER,1)) | 
POKE ZPSN, 128 + NVAR | 
ZPSN = ZPSN + 1: NEXT : RETURN 


REM ZEICHEN SUCHEN 

IF LEN (ZEICHEN$) = ß THEN 159 
FOR LOOP = 1 TO LEN (ZEICHEN$) 
IF ASC ( MID$ (ZEICHEN$,LOOP,1)) 
= HVAR THEN GEFUNDEN = 1: 
ZAEHLER = LOOP: LOOP = 

LEN (ZEICHEN$) + 1: NEXT: RETURN 
NEXT 

GEFUNDEN = @: RETURN 


168# 
1665 
161® 
1615 
1629 
1625 
163 


REM CODE LOESCHEN DURCH VERSCHIEBEN 


IVAR = ANFG + (ZABHLER - 1) = 17 
FOR PTRCOD = IVAR TO CH 

POKE PTRCOD, PEEK (PTRCOD + 17) N 
NEXT: MOD = 1 : 

CE = CE — 17: RETURN 


1635 : 


1649 


REM ANZEIGE LOESCHEN 


1645 : 


1656 
1655 


1669 


FOR ZAEHLER = 1 TO IVAR 

POKE ZPSN,168: ZPSN = ZPSN + 1: 
IF ZPSN = 1328 THEN ZPSN = 1418 
NEXT: RETURN 


1665 : 


1678 


REM ZEICHEN EDITIEREN 


1675 : 


168® 
1685 


1699 


1695 


1798 
1785 


1718 
1715 
1728 
1725 


1739 


EDITIEREN = 1 

ZPSN = 1186: UNI$ = M2$: 

GOSUB 1539: 

POKE ZPSN, 127: | 
REM ZEICHEN AUSGEBEN 

GOSUB 1635: POKE ZPSN, (128 + 
HVAR): GOSUB 1565: 

REM ZEICHENSUCHEN 

IF GEFUNDEN = ® THEN 1725: 

REM ANZEIGE LOESCHEN 

GOSUB 2ß69: REM ZEICHEN-->FKETTEAZ 
GOSUB 2188: 

REM FKETTE%-->BITMATRIX 

GOSUB 2245: GOTO 1865: 

REM HILFSMENUE 

GOSUB 1488: REM MATRIX-->FKETTEA 
GOSUB 2219: REM FKETTE%Z-->CODE 
GOSUB 2285: REM HILFSMENUE 
LOESCHEN 

EDITIEREN = 9: CLEAN = FRE (ß): 
GOTO 1385 


1735 : 


1740 


REM INITIALISIEREN 


1745 : 


1758 
1755 
176® 
1765 


1778 


GOSUB 2335: 
GOSUB 2595: 


PRINT D$; "NOMON,C,I,0": 
REM PARAM/MENUE 

GOSUB 2635: GOSUB 2725: REM MATRIX 
GOSUB 2899: REM DRUCKERSTRING 

ZPSN = ZBEG: GOSUB 2845: GOSUB 1789: 
REM FX89 LADEN/ANALYS. 

RETURN 


1775 : 


1789 


REM CODE ANALYSIER. 


1789: 


1798 
1795 


1809 
1805 
1819 
1815 
1829 


1825 


1836 
1835 


1848 


GOSUB 1895: GOSUB 1938: 

REM SATZ/ENDE? 

GOSUB 181ß: GOSUB 185ß: 

REM ZEICHENERMITTELN/DARSTELLEN 
RETURN 


REM ZEICHEN ERMITTELN 


FOR PTRCOD = (ANFG + 3) TO 

(CE - 17) STEP 17 

ZEICHEN$ = ZEICHEN$ + CHR$ 

(PEEK (PTRCOD)) 

NEXT 

IF ASC (ZEICHEN$) = ®® THEN 
ZEICHENS = '""" 

CLEAN = FRE (ß): RETURN 


1845 : 


185% 


REM ZEICHEN DARSTELLEN 


1855 : 


1869 
1865 
187 


1875 


188® 
1885 


IF LEN {(ZEICHEN$) = ® THEN RETURN 
FOR ZAEHLER = 1 TO LEN (ZEICHEN$) 
FPOKE ZPSN, 128 + ASC 

(MID$ (ZEICHEN$, ZAEHLER,1)) 

ZPSN = ZPSN + 1: IF ZPSN = 1328 
THEN ZPSN = 1418 

NEXT 

RETURN 


1898 : 


1895 


REM FX86-INIT ENDE ? 


1989 : 


1985 


1918 
1915 


192 


LAENGE = PEEK (PLAENGE) + PEEK 
(PLAENGE + 1) * 256 

FOR LOOP = ANFG TO (ADDR + LAENGE) 
IF PEEK (LOOP} = CMARKE THEN 

CE = LOOP: LOOP = ADDR + LAENGE + 1 
NEXT: RETURN 


1925 : 


1939 


REM SATZ FESTSTELLEN 


1935 : 


1949 


STZ = PEEK (ANFG - 1}: 
POKE SPSN, (STZ + 176) 
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RETURN 


REM EDITIERHILFEN LOESCHEN 










FOR IVAR = B TO 9 
1978 FOR JVAR = 8 T0 8 
1975 POKE SHOW(IVAR, JVAR),16$: 






BIT(IVAR,JVAR) = 16ß 
NEXT: NEXT: 28 = 0: 83=9 
GOSUB 2285: RETURN 






198 







REM ZEICHEN AN CODE HAENGEN 





POKE.ANF — 1,(STZ - 176): 









PTRCOD = CE - 5 
201® FKETTEZ(4) = CH - 128: FKETTEZ(5 
FKETTEZ(4) 
2815 FOR ZAEHLER = 1 TO 22 
2028 PTRCOD = PTRCOD + 1 
2625 POKE PTRCOD, FKETTEZ (ZAEHLER) 
20838 NEXT: CE = PTRCOD 
2035 LVAR = ZBEG + LEN (ZEICHEN$) 
2048 IF LVAR > 1319 THEN LVAR = 







LVAR + 98 
POKE LVAR,CH 
POKE SPSN,STZ: ZEICHEN$ = 
ZEICHEN$ + CHR$ (CH - 128) 
CLEAN = FRE (ß): RETURN 
REM ZEICHEN-->FKETTEZ 






2045 
2059 






2855 







2878 





LVAR = ANFG + 5 + (ZAEHLER - 1) 

* 17: REM ZEIGER-AUF-ZEICHEN-BEG, 
PTRCOD = LVAR 

FOR ZAEHLER = 6 TO 16 
FKETTE%A(ZAEHLER) = PEEK (PTRCOD) 
PTRCOD = PTRCOD + 1: NEXT: RETURN 






2075 
2089 
2085 
2030 









REM FKETTE%-->BIT MATRIX 






= 9: UG = 











2115 IF FKETTEA(6) = 139 THEN JVAR = 06 
GOTO 2125 

2128 06 = 0G + 1: UGE = UG +1 

2125 FOR IVAR = ® TO 9: KVAR = 7: MVAR 
= 128 

2138 FOR JVAR = 0G TO UG 

2135 HVAR = FKETTEZ(IVAR + 7): IF HVAR = 






ß THEN JVAR = UG 

HVAR = HVAR — MVAR 

IF HVAR < Ö THEN 2168 

FKETTEZ{IVAR + 7) = FKETTEZ(IVAR + 
7) —- MVAR 






2149 
2145 
215 











2155 BIT(IVAR,JVAR) = 178: 

POKE SHOW(IVAR,JVAR), 179 
2168 KVAR = KVAR — 1: MVAR = 2 1 KVAR 
2165 NEXT: NEXT 
2178 ZAEHLER = $: 28 = $: Z8 = 20 
2175 IF 0G = ® THEN JVAR = 9: 






ZAEHLER: RETURN 
ZAEHLER: 


GOSUB 2198: Z6 = 
JVAR = 8: GOSUB 2198: 78 = 
RETURN 






2189 








FOR IVAR = ß TO 9 

IF BIT{IVAR,JVAR) = 
ZAEHLER = ZAEHLER + 
NEXT: RETURN 


219% 
2195 





a THEN 











REM EDITERGEBNIS-->CODE 





PTRCOD = LVAR 
FOR ZAEHLER = 6 TO 16 

POKE PTRCOD, FKETTE% (ZAEHLER ) 
PTRCOD = PTRCOD + 1: NEXT: RETURN 






BARS 
2250 















REM HILFSMENUE 









ZPSN = 1488: UNI$ = Md$: GOSUB 1539 
2260 ZPSN = 1616: UNI$ = M9$: CGOSUB 1539 
2265 ZPSN = 1744: UNI$ = M7$: GOSUB 1539 
2270 ZPSN = 1872: UNI$ = MÖ$: CGOSUB 1539 
2275 (8): RETURN 





CLEAN = FRE 






REM ANZEIGEN LOESCHEN 


ZPSN = 1488: GOSUB 2315 









2300 ZPSN = 1616: GOSUB 2315: 
ZPSN = 1744: GOSUB 2315: 
ZPSN = 1872: GOSUB 2315 
2305 ZPSN = 1232: GOSUB 2315: REM SATZ 
2318 ZPSN = 11@4: REM ZEICHEN 
2315 FOR ZAEHLER = ZPSN TO (ZPSN + 13) 
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2359 
2355 
2369 


23565 


2379 
2375 


2490 


2415 
2428 
2425 
2439 
2435 
2449 


2445 
2450 
2455 


2465 
2470 
RATS 
2489 
2485 


2498 


2528 
2525 


2549 
2545 
2558 
2555 
2569 
20965 
2578 
2375 
2588 


2695 
2619 
2615 


2629 





2659 
2655 
2669 
2665 
2679 
2675 





2785 
2718 


2405 CE = 
2418 CH = 


2460 0G = 


RETURN 


REM KONSTANTEN 


ADDR = 


REM MASCHINENPROGRAMM 


CMARKE = 255: REM CODE ENDE 
KEYBD = - 16384: KSTRB = — 16368 
PLAENGE = 43616: REM ENTHAELT 


PROGRAMMLAENGE: 48K-DOS! 
DIM SHOW(9,8): 


SCREEN 
SPSN = 
ZBEG 


| 


ANFG = 


DIM BIT(9,8): 


ZEICHE 


CLEAN = 
CODE = 


DIM FKETTEA(22) 
EDITIEREN = 


HVAR = 
IVAR 
LVAR = 


LAENGE = 


LOOP = 
MOD = 


PTRCOD 
STZ = 


UG = 8: 


ZAEHLE 


zB = 8: 


REM FL 
ZPSN = 


REM ST 





Da 
UNI$ = 
ZEICHE 
REM GE 


MS = 
FX-89" 
M2$ = 
M3$ 
M4$ = 
M5$ = 
M6$ = 
M7$ = 
M8$ = 
M9$ = 
Mö$ = 
RETURN 


REM HA 


HOME: 


VTAB 3: 
VTAB 5: 


PRINT 


VTAB 9: 


PRINT 
VTAB 1 
PRINT 
RETURN 


REM MA 


HVAR = 
REM -, 
GOSUB 
DATA 
DATA 


HVAR = 


DATA 
DATA 
GOSUB 


REM GI 
FOR JV 


FOR ZA 
POKE ( 


NEXT: 


POKE ZAEHLER, 16ß: 





REM VARIABLEN 






ANFG: REM CODE END ADDR 
B: 


B: 






NEAT 











32768: HIMEM: (ADDR - 1}: 










REM HOR, VERT MATRIX 






POS 
1546: REM SCREEN SATZ POS 
1299: REM SCREEN ZEICHEN POS 











ADDR + 37: REM PATCHBEREICH 
REM MATRIX MIT 
N FUER FX89 








REM ASCII-ZEICHEN 
Ö: REM FREE MEMORY 
@: REM EINZUFUEGEN 
REM DRUCKERSTRING 
Ä: REM FLAG 
Ö: REM HILFSVAR 
d: JVAR = Ö: KVAR = $: 

Ö: MVAR = 9 
ß: REM DES CODES 

: REM ZAEHLER IN FOR/NEXT 
Ö: REM FLAG CODE AENDERUNG 
REM ARRAYBEGRENZER 
= ANFG: REM ZEIGER FUER CODE 
d: REM ZEICHENSATZ 
REM ARRAYBEGRENZER 
R = l: REM ALLROUND 
28 = ß: 
AG-BESETZUNGS-MATRIX 
ZBEG: REM ZAEHLER ZEICH POS 






















RINGS 





HR$ (4): REM CTRL-D 

" "2 REM ARBEITSSTRING 
N$ = m. 
AENDERTE ZEICHEN 











" ZEICHENDEFINITION FUER 






" ZEICHEN: " 
NISATZ U 

" [A]BBRECHEN" 

" [B]EENDEN!" 

" [E]DITIEREN" 

" [L]OESCHEN!" 

" [R]EDEFINIEREN" 
" [SJETZEN" 

" [E]INGEBEN! 

















UPT-MENUE ANZEIGEN 










VTAB 1: PRINT Ml$: 
PRINT M2$ 
PRINT M3$: VTAB 7: 
MAa$ 
PRINT M5$: VTAB 11: 
M6$ 
3: PRINT M7$: VTAB 15: 
M8$ 








TRIX 









In: 
STEP 
2698 
1682,1938,121®, 1466, 1722 
1978,1259,15ß6,1762, 2918 

186: IVAR = 2: KVAR = 9 
1819, 1082,1338, 1594, 1856 
1122,1378, 1634, 1899 
2690: RETURN 


IVAR = 1: KVAR = 1$: 












TTER ZEICHNEN 









AR = 1 TO KVAR: READ ZPSN 
EHLER = 1 TO 21 STEP IVAR 
ZPSN + ZAEHLER) ,HVAR 

NEXT: RETURN 










2 dRUCkER 4 







REM ARRAY MIT SCREEN ADDR FUELLEN 
DATA 1812,1%84,1349,1596, 1852 
DATA 1124,1389,1636,1892 

FOR IVAR = 8 TO 8: READ ZPSN 

FOR JVAR = ß TO 9 
SHOW(JVAR, IVAR) = ZPSN 

ZPSN = ZPSN + 2: NEXT: NEXT 


2730 
2735 
2740 
2745 
2758 

















REM SPACES-->MATRIX 








2775 FOR JVAR = 8 TO 9 
2788 FOR IVAR = $ TO 8 
2785 BIT(JVAR,IVAR) = 169 






NEXT: NEXT: RETURN 






REM DRUCKERSTRING VORBEREITEN 


FKETTEZ(1l) = 27: FKETTEZ(2) = 38 
FOR ZAEHLER = 18 TO 22 

READ FKETTEZ(ZAEHLER) 

NEXT 

DATA 27,37,81,90,255 

RETURN 






2815 
2828 
2825 
2836 










REM FX88-INIT LADEN 


UNI$ = "BLOADFX8@.INIT,A" + 
STR$ (ADDR) 

PRINT D$; UNI$ 

RETURN 






2869 








REM BEENDEN 





IF MOD = ® THEN 2915: HVAR = 

CE — ADDR + 1 

UNI$ = "BSAVEFX8ß.INIT,A" + 
STR$ (ADDR) + ",L" + STR$ (HVAR) 
PRINT D$; UNI$ 


2885 






2899 








REM ABBRECHEN 






POKE KSTRB,®: PRINT D$:"MON,C,IL,O": 
HOME: END 






APPLE & CP/M-80 & MS-DOS 
SOFTWARE & HARDWARE 


z. 8. für APPLE It und Kompatihie 
Wir liefern die RAM-Karte (AE) für den mE Ile mit max. 3 MB 
K-A 


(Appleworks mit mehr als 2 MB)! 64-K-Ausft. .. 222222... DM 650.- | 
SpeeDernon 3.56 MHz Coproz. für il+/e (MeT) .......... DM 700.- 
Anpassung für Appleworks 1.2 auf dem II-+/2. 

Original oder mit externer Tastatur. Anpassung in deutsch 

für SATURN 128 Kund IBSAP331 MB! . .......22..., DM 170.- 
UPG-Programmer-Gard 2716-128 komfortabel ...-.-.:.. DM 380.- 
72 \/0 Port Card programmierbar DOS+CP/M.. . ......... DM 280.- 


AD 16 Ch. 12 Bit, schnefl! (Applied Eng.) . . 2.222222... DM 1150.- 
PKASO/U-Printer-Karte (IS)... 2202020 on DM 550.- 
CP/M-Plus-Card, 6 MHz, 64 K, CP/M3.0 (ALS)... ....... DM 1150.- 
Timemaster IIH. O., die Uhrenkarte! En DM 540.- 
ELF kompl. Statistik-Software (VO ........ DM 500.- 


Prime-Plotter-Grafik-Software (Primesoft) ... . 22222... DM 900.- 


Z-RAMS12Kfür APPLE Ile (AE) © - 2 2 2 mo on. DM 1250.- 
z, B. für IBM und Kompatible 

APPLE Turnover (Vertex) Lesen/Schreiben von a Disks 

im IBM PC & Komp. .- rn .- DM 1000.- 
XENO-COPY plus (Vertex) Lesen/Schreiben div. 

CP/M & MS-DOS Formate im IBM euer. DM 450.- 
ELF PC kompl, Statistik Software (TWG) . ....222.... DM 500.- 
PROM Blaster 28-Pin (Apparat Inc.) ©. oc een. UM 620.- 
z. B. für alle Systeme 

Printerchanger 3 parall, Drucker auf 1 Micro 

inkt. KabeliNetzteil (Keyzone) . 2.220200 oe DM 570.- 
Printersharer 3 Micros auf 1 parall. Drucker 

inkl. Kabel/Netzteil (Keyzone) . . 222 een. .„ DM 460,- 
Shufflebufter 6AKÄS) 2 0222 rn .. DM 1250.- 


Wir sind Import-Spezialisten und bieten Ihnen eine große Auswahl an Software 
und Hardware bedeutender Hersteller aus den USA und England, 
Informationen gegen DM 3.- in Briefmarken. 


WEISS COMPUTER _ bipi.-Psych. Kari-Heinz Weiß 


Am Wiesenhof 17, 2940 Wilhelmshaven, Tel. 0 44 21,8 31 79 
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FX80.1NIT 
802D: 42 BB 92 
BSAVE FX86. INIT,A$8009,1144 8030: BB a2 Ic 51 HEX BBA21CH20009 
8833: B2 88 20 
} * Zeichensatz des FX80 modifizieren 52 * 
2 * 53 * Buchstabe-O0 
5 * Adressen fuer Drucker in SLOT 1 54 * 
4 * 8ß36: 1B 26 Pd 55 HEX 1B26W84F4F 
5 BUSY = SC1C1 8939: AF 4AF 
6 PRINTER = $cH9B eß3B: 8B 38 44 56 HEX 8B3844820882 
fi + | | 8SöZE: 82 BB 82 
8 * Marke fuer Tabellenende | sdal: Ad 82 AA 57 HEX 0824438890 
Son 8044: 38 MB DW 
STOF = $FF 58 * 
* 59 * Umlaut-O 
* Tabellenzeiger auf 1, Element | 6 * 
* | 8047: 1B 26 B8 61 HEX 1B26BB5C5C 
ADDR LDY #9 | 8B4A: 5C 5C 
* | sfac: 8B 98 24 62 HEX 8B982442A042 
* Tabelle an Drucker uebertragen shar: 42 BB 42 
* 8852: BB 42 24 HEX #64224980009 
LOOP LDA TAB,Y 8055: 98 BB B0 
WAIT BIT BUSY 64 % 
BMI MAIT 65 * Umlaut-o 
STA PRINTER | | 66 * 
* 8058: 1B 26 BB 67 HEX 1B26B0TC7C 
* Tabellenende erreicht? BO5SB: 7C 7C 
+ sö5D: 8B Bd Pc 68 HEX 8BBBHCS2BB12 
#+5TOP 8d69: 52 80 12 
FIN Ä 8063: BB 52 BC 69 HEX BRS2BCHBNNGD 
gB66: BB de 
LOOP ; 78 * 
LOOP+2Z go * Umlaut-A 
LOOP T2 E 
* 8069: 1B 26 BB 73 HEX 1B26095B5B 
FIN 8dsc: 5B 5B 
* SöGE: BB SE 1ß 74 HEX 8&B8E10284988 
* Drucker normalisieren 8071: 28 40 88 
* 8074: Ad 28 19 75 HEX 4BR281dBERBRB 
TAB HEX 1B4® 8877: SE BB 99 
23 76 = 
* Zeichensatz in den RAM-Bereich TH a Buchstabe-o 
* des Druckers kopieren 78 * 
* 807A: 1B 26 BB 79 HEX 1B26Bd6F6F 
HEX 1B3ABd0000 8ßT7D: SF 6F 
Sd7F: BB BB 1C 80 HEX BBÄBLCR2HB22 
sB82: 22 09 22 
Deutschen Zeichensatz waehlen B085: BO 22 1C Bl HEX BB221CHHB0B0 
gp88: BB AD 90 
185292 82 * 
| 83 * Zeichensatz aktivieren 
Umlaut-u 84 * 
8d8B: 1B 25 Bl 85 HEX 1B25819% 
1B26B®87D7D SlBE: BB 
86 * 
BBABLCA2BAB2 8sösgßrF: FF 87 HEX FF ' STOP 





Die umfassende Marktübersicht für Hobby- 
Elektroniker und Computeranwender, 
Klar gegliedert: 


10. Ausstellung fur Funk- und Hobby-Elektronik In Halle 5 das Angebot für CB- und 


Amateurfunker, Videospieler, DX-er, Radio-, 
Tonband-, Video- und TV-Amateure, für 
[I Elektro-Akustik-Bastler und Elektroniker. 
Mit dem Actions-Center und Laborversuchen, 
Experimenten, Demonstrationen und vielen 
3. Ausstellung Tips 
für Computer, j 
Software In Halle 6 das Superangebot für Computer- 
und Zubehör 


anwender in Hobby, Beruf und Ausbildung. 
Dortmund Dazu die „Computer-Straße” als Aktions- 


bereich, der Wettbewerb „Jugend program- 
18.- 22. Februar 1987 _nmier” und die Stände der Computerclubs. 














Ausstellungsgelände Westfalenhallen Dortmund täglich 9.00-18.00 Uhr 
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1. Einführung 


Eine der Anweisungen im Befehlssatz des 
6502-Prozessors, deren Möglichkeiten für 
gewöhnlich nicht erschöpfend genutzt 
werden, ist der BRK-Befehl. Üblicherwei- 
se wird dieser nur dazu benutzt, um ein 
Maschinenprogramm abrupt anzuhalten 
und gleichzeitig die Inhalte der verschie- 
denen Register und des Programmzänlers 
auszugeben. Das im Apple Il befindliche 
Autostart-ROM ermöglicht es jedoch, voll- 
ständige Kontrolle darüber auszuüben, 
durch welche Routine ein BRK behandelt 
werden soll. 

Ich werde im weiteren zunächst einmal die 
genauen Abläufe im Inneren des 6502 bei 
Erkennen eines BRKs erläutern. Daran 
schließt sich dann eine sinnvolle prakti- 
sche Anwendung an. Und zwar soll eine 
Utility vorgestellt werden, mit deren Hilfe 
es möglich ist, Assemblerprogramme ver- 
schiebbar zu machen. 


Wollte man bisher eine Routine in unter- 
schiedlichen Speicherbereichen ausfüh- 
ren, so mußte man sich bei den Sprüngen 
auf Branch-Befehle (BEQ, BCC usw.) be- 
schränken, denn diese geben keine abso- 
lute Sprungadresse an, sondern definie- 
ren im Unterschied zu JMP oder JSR eine 
Adresse relativ zum momentanen Inhalt 
des Programmzählers. Der Zugriff auf be- 
stimmte Speicherzellen (etwa durch LDA, 
STA, AND usw.) mußte in jedem Fall über 
absolute Adressen erfolgen, denn der 
6502 kennt hierbei keine relative Adres- 
sierung. 

Mit der von mir vorgestellten Technik wird 
es möglich, alle Anweisungen mit relativen 
Adressen zu versehen. Damit können 
dann Unterprogramme völlig unabhängig 
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von der Ladeadresse aufgerufen und Stel- 
len innerhalb des eigenen Codes adres- 
siert werden. 


2. Interrupts 


Wenn ein Programm von einem Prozessor 
ausgeführt wird, so erfolgt dies normaler- 
weise Schritt für Schritt. Um jedoch auch 
auf externe Ereignisse möglichst schnell 
reagieren zu können, sind Prozessoren 
mit der Fähigkeit zum Interrupt ausge- 
stattet. 

Nehmen wir einmal an, daß ein Computer 
einen technischen Prozeß überwacht und 
daß eines der angeschlossenen Meßgerä- 
te einen kritischen Zustand registriert. 
Dann ist es in der Regel nicht vertretbar, 
daß darauf gewartet wird, bis der Compu- 
ter (die Software) dieses Gerät überprüft. 
Vielmehr muß der Prozessor unmittelbar 
über die neue Situation informiert werden. 
Das Meßgerät ist dafür mit der CPU über 
eine spezielle Leitung verbunden und 
kann über diese melden, daß eine beson- 
dere Aktivität erforderlich ist. Sobald der 
Prozessor diese Nachricht erhält, unter- 
bricht er sofort das laufende Programm 
und arbeitet eine spezielle Unterbre- 
chungsroutine ab. Da er aber nach deren 
Beendigung wieder zu seiner eigentlichen 
Aufgabe zurückkehren soll, muß er sich 
zuvor die Adresse, an welcher er unter- 
brochen wurde, sowie seinen internen Zu- 
stand (Flags und evtl. auch Register) 
merken. 


Der 6502 besitzt nun 3 derartige Leitun- 
gen, nämlich RESET, IRQ und NMI. Davon 
ist RESET dem normalen Benutzer eines 
Apple Il wohl noch am geläufigsten, denn 





BRK — nur zum 
Anhalten? 





er kann diesen Interrupt einfach durch Be- 
tätigung der RESET-Taste aktivieren. Man 
benutzt ihn, um den Apple Il in einen 
wohldefinierten Anfangszustand zu ver- 
setzen. Die beiden anderen Änforderun- 
gen können im wesentlichen nur durch 
Interfacekarten (z.B. eine Uhr) ausgelöst 
werden. Der IRQ-Impuls unterscheidet 
sich vom NMI dadurch, daß er vom 6502 
auch ignoriert werden kann. Falls nämlich 
das Interrupt Disable Bit durch einen SEI- 
Befehl gesetzt wurde, so übersieht der 
6502 sämtliche IRQ-Anforderungen. 


Wenn ein IRQ oder ein NMI zum Prozes- 
sor durchdringt, schließt dieser erst einmal 
den momentan bearbeiteten Befehl ab. 
Danach wird der Inhalt des Programmzäh- 
lers (höherwertiges Byte zuerst), gefolgt 
von dem P-Register (Prozessor Status Re- 
gister, Flags), auf dem Stack abgelegt. So- 
mit ist gesichert, daß nach der Behandlung 
des Interrupts der Zustand zum Zeitpunkt 
der Unterbrechung wiederhergestellt wer- 
den kann. Um weitere IRQs (nicht aber 
NMIs) zurückzuweisen, wird daran an- 
schließend das Interrupt Disable Bit ge- 
setzt. 


Es sollte ausdrücklich darauf hingewiesen 
werden, daß die oben beschriebenen Tä- 
tigkeiten im Prozessor fest „verdrahtet“ 
sind. Man darf also nicht etwa im Spei- 
cherbereich nach Anweisungen suchen, 
die eben diese Aufgaben erfüllen. 

Es ist weiterhin erwähnenswert, daß der 
gesicherte Programmzähler immer auf das 
letzte Byte der zuletzt ausgeführten An- 
weisung zeigt. Er gibt also grundsätzlich 
die Adresse der folgenden Anweisung mi- 
nus I an. Dies ist auch konsistent mit der 
Behandlung eines JSR-Befehls. Wird 
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nämlich z.B. ein JSR auf $1234 ausge- 
führt, so wird als Rücksprungadresse nicht 
etwa $1237 (= $1234+3) sondern $1236 
(= $1234+2) auf dem Stack abgelegt. 
Trifft der 6502 dann auf ein RTS, so wird 
die oben auf dem Stack befindliche Adres- 
se in den Programmzähler transferiert, wo 
sie sofort inkrementiert wird (= $1236+1). 


Nach diesem in die Hardware integrierten 
Teil einer Interruptbehandlung geht es nun 
per Software weiter. Dazu befinden sich 
am Ende des Speicherbereichs 3 Adres- 
sen, welche angeben, wo nach Erkennen 
eines NMis ($FFFA-$FFFB), eines RE- 
SETs ($FFFC-$FFFD) oder eines IRQs 
($FFFE-$FFFF) fortgefahren werden soll. 
Wenn also z.B. ein IRQ ausgelöst wurde, 
wird nach der oben beschriebenen Ret- 
tung von Programmzähler und P-Register 
bei $FAAO (das ist der Inhalt von $FFFE- 
$FFFF) gestartet. 

Das dann ablaufende Programm muß erst 
einmal die übrigen Register retten, sofern 
es diese benutzen möchte. Danach über- 
prüft es, von welcher Stelle der Interrupt 
ausgelöst wurde, um das externe Ereignis 
dann in spezifischer Weise behandeln zu 
können. Verlassen wird eine solche IRQ- 
oder NMI-Routine durch den RTI-Befenhl. 
Dieser restauriert zunächst die Flags, in- 
dem er das oberste Byte vom Stack in das 
P-Register holt. Anschließend kehrt er 
ebenso wie der normale RTS-Befehl zum 
unterbrochenen Programm zurück, denn 
die Information über die Ruücksprung- 
adresse befindet sich dann oben auf dem 
Stack. 


Es erhebt sich jetzt aber sicherlich die 
Frage, warum denn so ausführlich die In- 
terrupts diskutiert werden, wo doch die 
Behandlung eines BRKs im Vordergrund 
stehen sollte. Doch dies kann sehr einfach 
beantwortet werden. Es istnämlich so, daß 
der 6502-Prozessor, sobald er auf ein 
BRK trifft, eine Interruptsequenz analog 
dem IRQ durchläuft. Somit wird also auch 
bei einem BRK der Programmzähler sowie 
das P-Register auf dem Stack abgelegt 
und dann zur IRQ-Routine verzweigt. Da- 
mit diese Routine aber ein BRK von einem 
echten IRQ unterscheiden kann, wird das 
P-Register, bevor es gerettet wird, modifi- 
ziert. Und zwar wird im Falle eines BRKs 
das BRK-Bit (s. Abbildung 1) gesetzt und 
ansonsten zurückgesetzt. 

Eine besondere Behandlung des BRKs 
durch den 6502, die sich vom normalen 
IRQ unterscheidet, muß noch kurz er- 
wähnt werden. Wenn ein BRK auf der 
Adresse A angetroffen wurde, so wird die 
Adresse A + 2 auf dem Stack gerettet. 
Dies ist aber sicherlich schon jedermann 
aufgefallen, denn wenn z.B. ein BRK auf 
der Adresse $0300 ausgeführt wird, so 
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Abbildung 1 
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gibt der Monitor neben den Inhalten der 
Register auch die Adresse $0302 aus. 


Doch wie geht es nun in der Software 
weiter, nachdem ein BRK-Befehl vom Pro- 
zessor registriert wurde? Wir müssen uns 
dafür die IRQ-Routine ($FA40) im alten 
Autostart-ROM ansehen. (Dies gilt nicht 
für die neuen |lle/c-ROMs und den alten 
IIc, denn bei letzterem wird beispielsweise 
nach $C806 verzweidt, um mögliche 
Maus-Interrupts zu berücksichtigen.) 


IRQ STA $45 
PLA 
PHA 
ASL 
ASL 
ASL 
BMI BREAK 
JMP ($B3FE) 
BREAK PLP 
JSR SAVl 
PLA 
STA $3A 
PLA 
STA $3B 
JMP ($B3Fö) 


Man erkennt, daß zunächst der Akkumula- 
tor in der Zero-Page gerettet wird. An- 
schließend wird das P-Register vom Stack 
in den Akkumulator kopiert, um das BRK- 
Bit zu isolieren. Falls dieses tatsächlich 
gesetzt war, wird zum Label BREAK ver- 
zweigt. Nachdem die Routine SAV1 alle 
Register in der Zero-Page gespeichert hat, 
wird auch noch die Rücksprungadresse 
vom Stack genommen und ebenfalls in der 
Zero-Page abgelegt. 

Der abschließende indirekte Sprung JMP 
($03F0) ist der für uns wichtigste Teil die- 
ser Routine. Er verlagert nämlich die Kon- 
trolle über die weiteren Ereignisse aus 
dem ROM-Bereich heraus in den RAM- 
Bereich. Im Normalzustand befindet sich 
in den beiden Speicherzellen $03F0 und 
$03F1 die Adresse desjenigen Unterpro- 
gramms, welches für die Ausgabe der Re- 
gister und den Sprung in den Monitor zu- 
ständig ist. Doch kann man natürlich auch 
sehr einfach die Adresse einer eigenen 
Routine eintragen, welche gar nichts mit 
der üblichen Bedeutung der BRK-Anwei- 
sung zu tun haben muß. Da alle Register 
und der Programmzähler zum Zeitpunkt 


der Unterbrechung gerettet wurden, kann 
diese Routine eine beliebige Aufgabe er- 
füllen und nach ihrer Beendigung zum un- 
terbrochenen Programm zurückkehren. 
Bevor eine derartige Änwendung vorge- 
stellt wird, soll noch einmal kurz der Ablauf 
nach Erkennen eines BRKs zusammenge- 
faßt werden: 

Trifft der 6502-Prozessor bei der Ausfüh- 
rung eines Programms auf einen BRK- 
Befehl, so setzt er zunächst das BRK-Bit 
seines P-Registers. Danach wird so ver- 
fahren, als ob ein IRQ-Impuls die CPU 
erreicht hätte. Dies bedeutet, daß der In- 
halt des Programmzählers (Adresse vom 
BRK plus 2) und das P-Register auf dem 
Stack abgelegt werden. Über den Vektor 
in $FFFE und $FFFF wird dann die Verar- 
beitung mit der IRQ-Routine des Auto- 
start-ROMs (auf $FA40) fortgesetzt. Zu- 
sätzlich zum P-Register und dem Pro- 
grammzähler, welche beide vom Stack 
entfernt werden, sichert dieser Code auch 
alle übrigen Register in der Zero-Page. 
Schließlich wird dann die Kontrolle an ein 
Programm übergeben, dessen Anfangs- 
adresse sich in $03F0 und $03F1 befinden 
muß, 


3. Aufgabenstellung 


Normalerweise wird bei der Erstellung ei- 
nes Maschinenprogramms eine feste 
Startadresse eingeplant. Für Utilities hin- 
gegen ist es sehr vorteilhaft, wenn diese 
Adresse auch nachträglich noch verändert 
werden kann. Ein Benutzer ist nämlich oft- 
mals daran interessiert, eine Utility in für 
ihn günstige Bereiche zu laden und zu 
starten. 

Um dies zu ermöglichen, dürfen bei der 
Programmierung nur solche Anweisungen 
benutzt werden, welche die Adresse einer 
Speicherzelle nicht absolut festlegen. Im 
Befehlssatz des 6502 trifft dies lediglich 
auf die bedingten Sprünge zu. Für den 
Transfer von Daten zwischen CPU und 
Speicher kennt der 6502 leider gar keine 
Befehle mit der Adressierungsart „re- 
lativ". 

im folgenden soll nun eine Utility vorge- 
stellt werden, mit deren Hilfe es möglich 
ist, alle Befehle, welche eine absolute 
Adresse erwarten, auch mit einer relativen 
Adresse auszustatten. So soll dann ein 
LDA $1234 nicht mehr den Inhalt von 
$1234, sondern den von $1234 + Pro- 
grammzähler in den Akkumulator laden. In 
der Abbildung 2 sind alle in Frage kom- 
menden Befehle mit den zugehörigen Op- 
Codes aufgelistet. Wenn darin ein Eintrag 
fehlt (z.B. für BIT adr,X), so liegt dies dar- 
an, daß der 6502 über eine solche ÄAnwei- 
sung nicht verfügt. 

Es ist natürlich nicht möglich, den 6502 
tatsächlich mit neuen Op-Codes für die 
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AUFTRAG FÜR KLEINANZEIGEN 

Bitte veröffentlichen Sie in der nächsterreichbaren Ausgabe nachstehenden 
Text unter folgender Rubrik: 

Üsuche Hardware DIsuche Software DI Verschiedenes D gewerblich 


[biete Hardware Dibiete Software DiChiffre [] nicht gewerblich 
Bitte den Text mit Schreibmaschine oder in Druckbuchstaben ausfüllen 
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Börse 








ee a a ee Ze a a le] 


Gelegenheitsanzeigen / 
Kleinanzeigen 


Sie können unter dieser 
Rubrik zu einem besonders 
günstigen Preis 


@ Ihre Hardware und 
Software verkaufen 


@ Ihre Hard- und Software 
@ Kontakte knüpfen und 


vieles mehr 
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Jeweils 32 Buchstaben pro Zeile- einschl. Satzzeichen und Wortzwischenräume. Bitte Ab- 
sender nicht vergessen. Mindestens 2 Zeilen (1 Druckzeile a 32 Buchstaben DM 5,50 nicht 
gewerblich, DM 11,— gewerblich + MwSt.) — Chiffregebühr DM 6,— + MwSt. 


PEekeR 44 


Zu der in Peeker, Het_____, Sete _______ erschienenen 


"W Peeker-Börse 





Musteranzeige privat 
(nicht gewerblich) 


1 Druckzeile a 32 Buch- 
staben nur DM 5,50 
zuzügl. ges. MwSt. 
Mindestens 2 Druckzeilen 


Anzeige über _ 





bitte ich um detaillierte Information. 
Ich wünsche U) Prospekt, Datenblatt D Preisliste O schriftliches Angebot I] tel. Rückruf 


Beispiel: 


gebe ich neben- 
stehende Bestellung 
unter Anerkennung 
Ihrer in der Anzeige 
genannten Liefer- und 
Zahlungsbedingungen 
auf. 







Verkaufe neuwerligen Typenrad- 
drucker mit Apple-Interface. 
Preis auf Anfrage. Tel. 007 


nur DM 18,81 inkl. MwSt. 








Unterschrift (für Jugendliche unter 18 Jahren der Erziehungsberechtigte) 


Musteranzeige gewerblich | = 

1 Druckzeile a 32 Buch- FIAT N PEE ER eh 
staben nur DM 11,- zuzügl. ’ 

ges. MwSt. Mindestens 


2 Druckzeilen 
Beispiel: 


=" Produkt-Karte 























Neu im Angebot: Professionelle, 
Separate Tastatur für Apple Il plus 
16 Funktionstasten und separatem 
Ziffernblock. 

Fa. Keyboard & Co. 








nur DM 62,70 inkl. MwSt. 





Ich interessiere mich für Beiträge über 
[I Apple DL) IBM [1 Atari er I ET Ir 


ch Info -Karte 





PLZ/Ort 

Bitte veröffentlichen Sie den um- 
stehenden Text von_______ Zeilen 
a 
b 


DM in der nächsterreich- 
aren Ausgabe vom Peeker 








N 
da 
:0 
7 
2 
Ö 
a 
v- 





Datum Unterschrift 





PIPYIP 


Karte bitte vollständig ausfüllen 





Bitte 


freimachen 


POSTKARTE 


Peeker-Börse 
Anzeigen-Service 


Dr. Alfred Hüthig Verlag 
Postfach 10 2869 
6900 Heidelberg 1 


Bitte 


Ireimachen 


POSTKARTE 


Inserent 


Straße 


PLZ/Or 


Bitte 


freimachen 


POSTKARTE 


Peeker 
Redaktion 


Dr. Alfred Hüthig Verlag 
Postfach 102869 
6900 Heidelberg 1 

















Produkt- 
Karte 








Wünschen Sie 
weitere Informatio- 
nen zu einer der im 
Heft erschienenen 
Anzeigen? 


Nichts einfacher als 
das. Produkt-Karte 
ausfüllen, frankieren 
und an den 
Inserenten (nicht an 
die Peeker-Redaktior 
senden. 


Bitte aber nicht 
vergessen: 

Kreuzen Sie an, 
welchen Informations 
wunsch Sie haben. 


Damit erleichtern Sie 
dem Hersteller 

eine gezielte Beant- 
wortung Ihrer Anfrac 


Zum Schluß tragen 
Sie auf der Rück- 
seite die genaue 
Anschrift des 
Inserenten und Ihren 
Absender ein. 


PEEkKER 








Abbildung 2 
[ a l | 
adr adr,X adr,Y (adr) . 
ADC 6D . 7D 79 Te 
AND 2D 3D%4 II, in m 
ASL BE 1E u 
BIT 2c - 
CP CD pp :» ser 
cCPX EC 
CPY cc 
DEC CE DE 
EOR AD '5D 59 
INC EE FE m 
JMP 40 R sc 
JISR 26 = Be" 
LDA AD BD BB 
LDX AE BE 
LDY AC BC | 
LSR 4E 5E - - 
- ORA BD 1D 19 ! 
RL  2E 3E 
ROR 6E TE 
SBC ED FD F9 
STA 8D 9D 99 
STX BE 
STY 8c 


relative Adressierung auszustatten. Dies 
wäre nur durch einen Neu-Entwurf des 
Prozessors zu schaffen. Wir müssen uns 
daher mit einer softwaretechnischen Lö- 
sung begnügen. Aber dies ist jetzt auch 
der Punkt, wo der BRK-Befehl seine Fä- 
higkeiten unter Beweis stellen kann. So 
soll nämlich ein BRK vor einer Anweisung 
mit einer absoluten Adresse deren Adres- 
sierungsart in „relativ“ umändern. Be- 
trachten wir als Beispiel einmal den fol- 
genden Code. 


NOP 
LDA $4321 
BRK 
STA $1234 
NOP 


Diese Anweisungsfolge holt zunächst den 
Inhalt der Speicherzelle $4321 in das A- 
Register. Danach soll dann nicht etwa das 
Programm gestoppt, sondern vielmehr der 
Akkumulator in derjenigen Speicherzelle 
abgelegt werden, welche $1234 entfernt 
ist. Die zu erstellende Utility muß daher in 
der Lage sein, die einem BRK folgende 
Anweisung zu analysieren und diese dann 
mit der korrekten, absoluten Adresse aus- 
zuführen. 

Doch zunächst muß erst einmal festgelegt 
werden, worauf eine relative Adresse be- 
zogen wird. Es bietet sich z.B. die Adresse 
des BRks oder aber die der folgenden 
Anweisung an. Ich habe bezüglich dieser 
Frage eine Entscheidung getroffen, wel- 
che mit der Behandlung von bedingten 
Sprüngen in Einklang steht. Gibt man etwa 
im Monitor den Befehl 300:10 00 ein, so 
wird dieser Code als BPL $0302 disas- 
sembliert. Man sieht also, daß die relative 
Adresse bei den Branch-Befehlen immer 
bezüglich der nächsten Anweisung ge- 
deutet wird. Ich habe dieses Prinzip über- 
nommen, so daß die absolute Adresse des 
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obigen Beispiels zu $1234 plus Adresse 
des zweiten NOPs berechnet werden 
kann. Läge dieses NOP auf $1000, so 
müßte der Akkumulator in $2234 gespei- 
chert werden. 


Nehmen wir einmal an, daß meine BRK- 
Routine bereits in den BRK-Vektor ($0O3FO 
und $03F1) eingehängt wurde. Welche 
Aufgaben muß sie dann erfüllen? Die Ret- 
tung des Programmzählers und der Regi- 
ster wurde bereits vom Autostart-ROM er- 
ledigt, so daß sie sich nur noch um Ihre 
eigentliche Aufgabe zu kümmern hat. Und 
zwar muß sie zuerst einmal den dem BRK 
folgenden Op-Code in einen ihr zur Verfü- 
gung stehenden Bereich kopieren. Da- 
nach wird sie aus der relativen Adresse 
und dem gesicherten Programmzähler ei- 
ne absolute Adresse errechnen und diese 
hinter dem Op-Code abspeichern. Nach- 
dem alle zum Zeitpunkt des BRkKs vorlie- 
genden Registerinhalte wieder restauriert 
wurden, kann dann diese generierte An- 
weisung ausgeführt und zum unterbroche- 
nen Programm (Adresse des BRks plus 4) 
zurückgekehrt werden. 


Eine gewisse Sonderbehandlung muß bei 
einem JSR-Befehl mit relativer Adresse 
erfolgen. Denn selbst wenn die absolute 
Adresse des Unterprogramms berechnet 
wurde, kann nicht einfach ein JSR-Sprung 
dorthin ausgeführt werden. Dadurch wür- 
de nämlich als Rücksprungadresse eine 
Adresse auf dem Stack abgelegt, welche 
innerhalb des Codes für die BRK-Behand- 
lung läge. Beim nächsten RTS soll aber 
doch hinter die JSR-Anweisung (also in 
das Anwenderprogramm) zurückgekehrt 
werden. Aus diesem Grund muß die Abla- 
ge der Rücksprungadresse auf dem Stack 
von der BRK-Utility explizit erledigt und 
zum Unterprogramm dann nur mittels ei- 
nes JMPs verzweigt werden. 


4. Implementation 


Der Code für meinen BRK-Prozessor (s. 
Listing BRK) besitzt eine Länge von etwa 
180 Bytes, so daß er sehr gut in den 
$0300-Bereich paßt. Er wurde aber so ge- 
schrieben, daß er bei jeder Adresse der 
Form $xyO0O gestartet werden kann. Diese 
Möglichkeit konnte natürlich nicht aus dem 
Trick mit dem BRK-Befehl bezogen wer- 
den. Vielmehr mußte dieser Code „echt“ 
verschiebbar sein. 


Aus der Zero-Page werden für den Zeiger 
BEF_PTR die beiden Speicherzellen O und 
1 benötigt, die aber immer gerettet wer- 
den. MON_PC bezeichnet diejenige Stel- 
le, in welcher vom Autostart-ROM der Pro- 
grammzähler abgelegt wurde. Die Spei- 
cherzellen, die für die übrigen Register 
benutzt wurden, müssen meiner Utility 
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nicht direkt bekannt sein. Der Monitor stellt 
nämlich eine Routine (MON_REST) zur 
Verfügung, welche deren°Inhalte zurück in 
die Register holt. MON_BRK ist dasjenige 
Programm, welches normalerweise nach 
einem BRK aufgerufen wird. Ich benutze 
es, wenn dem BRK“ein ungültiger Op- 
Code folgt, so daß in diesem Fall das BRK 
tatsächlich zum Anhalten verwendet wird. 


Die Zeilen 35-43 stellen ein kurzes Unter- 
programm dar, welches den BRK-Vektor 
mit der Anfangsadresse von BRK_PROZ 
belegt. Also bevor BRK_PROZ benutzt 
werden kann, muß diese Routine einmal 
aufgerufen werden. Die Zeilen 38-41 sind 
der übliche Trick, um herauszubekom- 
men, in welche Seite die Utility geladen 
wurde (s. z.B. „Apple Il Reference Manu- 
al“, Seite 81). 


In Zeile 50 beginnt nun die eigentliche 
Utility, die immer dann die Kontrolle erhält, 
wenn vom Prozessor ein BRK ausgeführt 
werden sollte. Die Zeilen 50-53 sichern 
die beiden Speicherzellen der Zero-Page, 
indem sie deren Inhalt auf dem Stack ab- 
legen. 


Es wurde bereits erwähnt, daß 
BRK_PROZ eine Anweisung aufbauen 
muß. Dieses wird ab dem Label BEFEHL 
(Zeile 229) geschehen. Um einen Zeiger 
auf diese Stelle zu haben, wird in den 
Zeilen 59-63 der Pointer BEF_PTR mit die- 
ser Adresse initialisiert. 


Auf Grund der beschriebenen Eigenart 
des 6502 gibt MON_PC die Adresse des 
BRKs plus 2 an. Dies wird in den Zeilen 
68-73 korrigiert, indem von MON_PC 2 
subtrahiert wird. Falls es später tatsächlich 
zu einem Sprung in den Monitor kommen 
sollte, wird daher die wirkliche Adresse 
des BRKs ausgegeben. 


Indem in den Zeilen 83-86 zu dieser 
Adresse 4 hinzuaddiert wird, erhält man 
die Adresse derjenigen Anweisung, bei 
welcher im Normalfall (kein relativer JMP 
oder JSR) nach der Simulation fortgefah- 
ren werden soll. Diese Adresse wird in 
den Zeilen 91-96 in das Adreßfeld eines 
JMP-Befenls gespeichert, welcher im An- 
schluß an den aufgebauten Befehl ausge- 
führt wird. 


Die Zeilen 100-103 kopieren den dem 
BRK folgenden Op-Code des Änwender- 
programms in die BRK_PROZ-Routine. 
Daran anschließend muß überprüft wer- 
den, ob überhaupt einer der Codes aus 
der Abbildung 2 vorliegt. Dies wird von 
den Zeilen 108-134 erledigt. Diese sind 
sicherlich einfacher zu verstehen, wenn 
nicht die Abbildung 2, sondern die Abbil- 
dung 3 angesehen wird. In dieser über- 
sichtlicheren Darstellung wurden alle zu- 
lässigen Codes mit einem „x“ markiert. 
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Abbildung 3 
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Ihr entnimmt man, daß die Codes im we- 
sentlichen nach einem Schema aufgebaut 
sind. Ausnahmen von dieser Regel, wel- 
che in den Zeilen 108-118 abgefragt wer- 
den, wurden in der Abbildung 3 durch 
senkrechte Striche kenntlich gemacht. 
Sofern ein ungültiger Code angetroffen 
wurde, wird in Zeile 139 zur BRK-Behand- 
lung des Monitors verzweigt. Diese gibt 
den Programmzähler sowie die Register 
(jeweils aus der Zero-Page) aus und endet 
dann im Monitor. 

Andernfalls wird in 144 der Op-Code gesi- 
chert, da er später noch einmal benötigt 
wird. Zwar liegt wegen der ANDs nicht 
mehr unbedingt der ursprüngliche Op- 
Code vor, doch reicht auch dieser modifi- 
zierte Wert noch aus. Es wird später näm- 
lich lediglich ein Test auf Gleichheit mit 
$20 durchgeführt. Die Zeilen 150-155 
holen dann die dem Op-Code folgende 
relative Adresse, und 160-167 addieren 
die Rücksprungadresse, um so die abso- 
lute Adresse zu erhalten. Diese beiden 
Bytes werden anschließend durch die Zei- 
len 172-177 in dem Operandenfeld der 
erzeugten Anweisung abgelegt. 


Falls nun nicht gerade eine JSR-Anwei- 
sung aufgebaut wurde, sind im wesentli- 
chen alle Aufgaben erledigt. Die Zeilen 
181-184 stellen dies fest und löschen als 
Signal dafür das Carry-Bit. 

Wenn aber doch ein JSR vorgelegen hat, 
ist eine besondere Behandlung erforder- 
lich: Zunächst einmal wird in den Zeilen 
188-190 der JSR-Code in einen JMP- 
Code umgewandelt. Dann wird in 195-202 
die auf dem Stack abzulegende Informa- 
tion über die Rücksprungadresse (eigentli- 
che Rücksprungadresse minus 1, Adresse 
des BRKs plus 3) berechnet. Da sich aber 
oben auf dem Stack noch die gereftteten 
Speicherzellen 0 und 1 befinden, dürfen 
die beiden Werte noch nicht abgelegt wer- 
den. Als Zeichen dafür, daß die X- und Y- 
Register diese Information enthalten, wird 
in 204 das Carry-Bit gesetzt. 
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Die Zeilen 208-211 stellen den vorgefun- 
denen Zustand der Zero-Page wieder her. 
Und falls der Op-Code tatsächlich ein JSR 
gewesen ist, wird in 219-222 die Rück- 
sprungadresse für das nächste RTS auf 
den Stack geschrieben. Abschließend 
wird dann in 227-231 der Zustand zum 
Zeitpunkt des BRkKs restauriert, die gene- 
rierte Anweisung ausgeführt und zum An- 
wenderprogramm zurückgesprungen. 


Da der Programmfluß nicht ganz einfach 
ist, will Ich die entscheidenden Anweisun- 
gen noch einmal kurz zusammenfassen. 
Angenommen, das Anwenderprogramm 
enthält die folgenden Zeilen: 


BRK 
Opc Adr 
ZURUECK NOP 


Wenn nun Opc weder ein JMP noch ein 
JSR ist (also z.B. ein LDA, EOR, ROR 
usw.), wird die Anweisung mit der absolu- 
ten Adresse bei BEFEHL aufgebaut und 
ausgeführt. Der anschließende Sprung 
wurde zuvor auf das Label ZURUECK ge- 
richtet. 

Für den Fall, daß Opc ein JMP ist, werden 
die 6 Bytes zwar auch wie oben mit den 
entsprechenden Werten belegt, der 
Sprung auf BEFEHL + 3 gelangt jedoch 
niemals zur Ausführung, da bereits ein 
anderer auf BEFEHL erfolgt. 

Und falls Opc ein JSR ist, wird das Byte in 
BEFEHL in einen JMP-Code umgewan- 
delt. Das normalerweise vom JSR selbst 
erledigte Ablegen der Rücksprungadresse 
wird in diesem Fall von der BRK-Routine 
übernommen. 


5. Ein Beispiel 


Angenommen, der BRK-Prozessor wurde 
an eine Adresse der Form $xyO0 geladen 
und die Prozedur BRK_INIT danach ein- 
mal aufgerufen, dann kann das ebenfalls 
abgedruckte Programm BRK-Prozessor- 
Test (s. Listing BRK.TEST) an irgendeine 
Adresse geladen und dort gestartet wer- 
den. Es gibt einige Texte aus und berech- 
net die Summe zweier Zahlen. Dabei wer- 
den eine Reihe von Befehlen mit einer 
relativen Adresse ausgeführt (am rechten 
Rand jeweils durch „<<<“ markiert). Se- 
hen wir uns das einmal etwas genauer an: 


In den Zeilen 16-17 findet man schon di- 
rekt eine Anwendung der BRK-Utility. Die 
Länge des relativen Sprungs beträgt 
$0082 Bytes, die von dem Assembler 
durch die Differenz START - ENTRY_1 
berechnet wird. 

Anstatt nun hinter jede Anweisung mit ei- 
ner relativen Adresse ein weiteres Label 
zu schreiben, wurde ein eleganterer Weg 
gewählt. In der Zeile 109 soll etwa zur 
Routine PRT_IXT gesprungen werden. 


Wenn man nun aber beachtet, daß „*“ 
dort den Wert $8089 besitzt, so kann die 
Differenz durch PRT_TXT - (x + 3) be- 
rechnet werden. Löst man dann noch die 
Klammer auf, so ergibt sich die dort ange- 
gebene relative Adresse. 


Es ist darauf zu achten, daß der Assembler 
bei den Op-Codes, die von BRK_PROZ 
bearbeitet werden sollen, die 3 Byte lan- 
gen Befehle wählt. Beim verwendeten 
Merlin-Assembler wurde dies durch An- 
hängen des „>" an den Op-Code er- 
reicht. Wenn also die relative Adresse klei- 
ner oder gleich $OOFF ist, darf auf keinen 
Fall die Zero-Page-Ädressierung erzeugt 
werden. Der entsprechende Op-Code 
würde von der BRK-Utility als unzulässig 
zurückgewiesen werden. 


Kurzhinweise 


1. Zweck: 

BRK-Utility für die Bearbeitung absoluter 
Adressen in nicht-reiokativen Pro- 
grammen., 

2. Konfiguration: 

Ii+ sowie bedingt Ile/c mit neuen ROMs; 
DOS 3,3 oder ProDOS 

3. Test: 

BRUN BRK 

BLOAD BRK.TEST 

CALL -151 

8000G 

4, Ssammeldisk: 

T.BRK (Big-Mac-Quelltext) 

BRK 

T.BRK.TEST (Big-Mac-Quelltext) 
BRK.TEST 
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BRK 


BSAVE BRK, A$3@9,1L177 


B3ße: 
#392: 


A305: 
A308: 
B3B9: 
B30C: 


BSBF: 


A318: 
#312: 
B313: 
#315: 


B316: 
A318: 


AZ1A: 
Ö31D: 


AZ1F: 
A321: 
0323: 
0324: 
#326: 
A328: 


6329: 
432B: 


A32D: 
B32E: 
0338: 
0332: 





#333: 
0335: 
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AS 
8D 


2D 
BA 
BD 
8D 


69 


AB 
Sı 


18 
FB 


58 


BB 
Fl 


D9 
Bl 


AB 
427) 


al 
21 


3B 
3A 


82 
Bl 


3A 
3B 


B4 
21 


Ba 
BB 


93 
FR 


81 
93 


83 


ORG $30% 
FEEFEFFETHF FF EHE FF HF 


BRK-PROZESSOR 


Michael G. Schneider 


Krk k + 
„ru % 


SE LE ID Zinn 22 So 22 02 2 2 27 
BEF_PTR EQU 9 


MON_PC EQU $3A 
$29 
$4c 


JSR_CODE EQU 
JMP_CODE EQU 


SYS_STCK EQU $108 


BRK_VKTR EQU $3F® 

$FAS9Y 
$SFFZF 
$FF58 


MON_BRK EQU 
MON_REST EQU 
MON_RTS EQU 
m. PIERRE ERROR 
* Initialisiere den BRK-Vektor mit der 

* Adresse von BRK_PROZ. 


#BRK_PROZ 
BRK_VKTR 


BRK_INIT LDA 
STA 


JSR 
TSX 
LDA 
STA 


MON_RTS 


SYS_STCK,X 
BRK_VKTR+1 


RTS 


:----- 7 


* Sichere den Inhalt von ® und 1 auf dem 
* System-Stack. Diese Speicherplätze 
* werden für BEF_PTR gebraucht. 


BRK_PROZ LDA 
PHA 
LDA 
PHA 


BEF_PTR 
BEF_PTR+1 
* Laß BEF_PTR auf diejenige Adresse 


in BRK_PROZ zeigen, wo die Anweisung 
* aufgebaut werden soll, 


* 


#BEFEHL 
BEF_PTR 


LDA 
STA 


LDA 
STA 


BRK_VKTR+1 
BEF_PTR+1 


* Stelle die Adresse des soeben ausge- 
* führten BRKs fest ... 


LDX 
LDA 
SEC 
SBt #2 

BCS BRK_PRZI1 
DEX 


MON_PC+1 
MON_PC 


#* .-:. und laß MON_PC darauf zeigen. 


BRK_PRZ1 STA 
STK 


MON_PC 
MON_PC+1 


* Addiere 4 hinzu und erhalte so die 
* Adresse des übernächsten Befehls, 


GCLC 

ADC #4 

BCC BRKLPRZ2 
INX 


* ... die dann in das Adreßfeld der JMP- 
* Anweisung gespeichert wird. 


BRK_PRZZ2 LDY #4 
STA (BEF_PTR),Y 





4337: 
338: 
0339: 


B33B: 
B33D: 
Ö33F: 
34B: 


6342: 
0344: 


B346: 
0348: 


D3ZAR: 
B34AC: 


B34AE: 
B35B: 


9352: 


0354: 
9356: 


358: 
B35A: 


B35C: 


B35E: 
360: 


8362: 
8364: 


366: 


B369: 


Ö36A: 
B36C: 
ÖS6E: 


B36EF: 
B378: 


372: 
6373: 
6375: 
A377: 


A378: 
#379: 
B37A: 


BSTC: 
ASTE: 


388: 
#381: 
#382: 


B384: 
N385: 
W386: 
M388B: 


ac 
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B9 


81 
3A 


7) 


20 
23 


DC 
1C 


BC 
1B 


9E 
14 


IF 


19 
11 


Öc 
ÖD 


ÖF 


BD 
57 


BE 
83 


99 


83 
3A 


3A 


BA 
20 


10) 


92 


1% 


DB 


FA 


INY 
TXA 
STA 


(BEF_PTR},Y | 
* Kopiere den Op-Code hinter dem BRK ... 


LDY #1 3 
LDA ({MON_PC),Y 
DEY 
STA (BEF_PTR),Y 

* ... und überprüfe, ob dieser erlaubt ist 


CMP #$2B 
BEQ GOOD_CDE 


CMP 
BEQ 


*$dC 
BAD_CDE 


CMP 
BEQ 


#$BC 
GOOD_CDE 


#*$9E 
BAD_CDE 


CMP 
BEQ 
AND #%8@811111 


#519 
GOOD_CDE 


CMP 
BEQ 


#$ÖC 
GDOD_CDE 


CMP 
BEQ 
AND #%0@0Q8111l 


#$ÖD 
GOOD_CDE 


CMP 
BEQO 


#$0E 
GOOD_CDE 


CMP 
BEQ 


* Es liegt ein ungültiger Code vor, also 
* halte das Programm an. 


BAD_CDE JMP MON_BRK 


* Er ist gültig. Sichere ihn erst einmal 
* auf dem Stack, 


GOOD_CDE PHA 


* Hole die relative Adresse in die 
* Register <A,X> und .. 


LDY #3 
LDA ({MON_PC),Y 
TAX 
DEY 
LDA (MON_PC),Y 
* ... addiere die Rücksprungadresse, um 


* die absolute Adresse zu erhalten. 


CLC 
LDY #4 

ADC (BEF_PTR),Y 
PHA 


TXA 
INY 
ADC (BEF_PTR),Y 

* Lege die absolute Adresse dann in das 
* OÖperandenfeld der erzeugten Anweisung. 


LDY #2 

STA (BEF_PTR),Y 
PLA 

DEY 

STA (BEF_PTR),Y 


* War der Befehl etwa ein JSR ? 


PLA 
CLC 
EOR 
BNE 


#JSR_CODE 
EXIT_PRP 
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0 


M3BA: 
B38C: 
W38E: 


B39B: 
#391: 
0393: 
B395: 


0396: 
0398: 
BS9A: 


B39B: 


A3SC: 
A39D: 
B39F: 
B3AB: 


B3A2: 


B3A4: 
Ö3A5: 
AZA6: 
D3AT: 


BZAB: 


B3AE: 


Ad 0 
a9 4C 


91 89 


18 
AS 
69 
AA 


3A 
83 


A5 
69 
AB 


3B 
Do 


38 


68 
85 
68 
85 


öl 
88 


98 94 


28 3F FF 


AG FF 


FF 


BRK.TEST 


BSAVE BRK.TEST, 


8BBB: 
8sdßl: 


88a: 


8097: 
8989: 
SDßc: 
8014: 
8ßlc: 
8Oß1E: 


8821: 
8924: 
sB2c: 
SBZF: 
8038: 
8933: 


DB 


46 82 


SF 46 


DB 


ED 


ES F3 F4 


186 
187 
188 
189 
199 
191 
192 
193 
194 
195 
196 
197 
198 
199 
208 
201 
282 
2683 
284 
205 
206 
207 
208 
2089 
218 
211 
212 
213 
214 
215 
216 
217 
218 
219 
229 
221 
222 
223 
224 
225 
226 
227 
228 
229 
239 
231 
232 


* Ändere das 


JSR in ein JMP um, 


JSR_BHDG LDY #9 
LDA #JMP_CODE 
STA (BEF_PTR),Y 
* ... berechne die Rücksprungadresse 


* minus 1 und sichere sie in <X,Y>. 


CLC 
LDA 
ADG 
TAX 


LDA 
ADC 
TAY 


SEC 


* Stelle die 
PLA 
STA 
PLA 
STA 


EXIT_PRP 


BCC 


Der Befehl 
die Rückspr 
abgelegt we 


”"%* %* 


TYA 
PHA 
TXA 
PHA 


* Restauriere 


* des BRKs. 

EXIT JSR 

BEFEHL DS 
JMP 


MON_PC 
+5 


MON_PC+1 
+0 


alte Zero-Page wieder her. 


BEF_PTR+1 

BEF_PTR 

EXIT 

war ein JSR, also muß jetzt 


ungadresse auf dem Stack 
rden. 


den Zustand zum Zeitpunkt 


MON_REST 
5 


SFFFF 


:- 111 7 


458909 ,1L152 


öl 


ORG 


H8098 


Er Eee I ER ZZ 2 2 2 2 2.2 2 2 22 22 2 502 22 2 2 2 2 2 2 223 


x=*k Hr %* 


BRK-PROZESSOR-TEST 


Michael G. Schneider 


Eu u SE Ze 


EEE Fr Er 2 2 2 2 2 22 2 3272 2 2 22 2 2 2 22 2 2 2 2 2 2 2 2 2 2 2 203 





ENTRY BRK 
JMP 

ENTRY_1 

“- 

MON_CR  EQU 


MON_PRHX EQU 
MON_COUT EQU 


HEX 
DS 


WERTE 
SUMME 


TXT 

TXT-ANF HEX 
ASC 

AB ES EI 


c2 D2 CB AD DA E5 


HEX 


TXTSU_B ASC 
E5 AB F6 


HEX 
TXT_SU_1 ASC 





START-ENTRY_1 


$FDSE 
$FDDA 
SFDED 


3F46 
T 


8D8ED 
"Dies ıst ein BRK-Test" 


8DEDAA 


"Die Summe von " 


#0 


u und IT 


8035: 
8036: 
8939: 
SB3B: 


8H3C: 
BASD: 
8HAB: 
8942: 
8945: 
8946: 


8048: 


8949: 
BBAB: 
shac: 


Sdar: 
8951: 
8952: 
8055: 


8058: 
BOSA: 
805B: 


BÖSE: 
BER: 
sö6l: 
8964: 


8067: 
8969: 
SB6A: 


BÄED: 
8ß6F: 
ET: 


8973: 
8074: 
8975: 
ghTr6: 


8979: 
SATA: 
8dTB: 


BATE: 
STE: 
8082: 


8085: 


8B86: 
8A88: 
8089: 


BBsc: 
SPD: 


839ß: 
8993: 


8996: 
8997: 


DD 
Ad 
4 
ao 


20 
BI 
F9 
20 
c8 
D® 


53) 


Ad 
BB 
28 


1) 
20 


28 
2d 


7) 
09 


E93 
AB 


c7 
ö6 
ED 


FA 


1A 
ED 


01) 


AF 
DA 


29 
DE 
81 


AB 
DA 


RF 


CF 


Do 


SI 


8B 


86 


84 
DA 


7) 
Bd 


B9 


8E 
8E 


F3 


FF 


ED 


FF 


FF 
FD 


FF 


FF 
FD 


FF 


FE 


er 


ER 


ER 


FD 


FF 


FF 


FD 


HEX 
TXTSU_2 ASC 


* Gib den Text aus, 


0) 


v ist! 





dessen Index sich in 


* Y-Register befindet. 


PRT_TXAT BRK 
LDA> 
BEQ 
JSR 
INT 
BNE 


PRNT_END RTS 
* 





* Stelle die zwei zu addierenden 


* VOT, 


TEST_SU LDY 
BRK 
JSR> 


LDX 
BRK 
LDA> 
JSR 


LDY 
BRK 
JSR> 


LDX 
BRK 
LDA> 
JSR 


LDY 
BRK 
JSR> 


= Addiere die 
* Ergebnis im 


BRK 
STA> 


TXT-#-3,Y <<< 

PRNT_END 

MON_COUT 

PRT_TXT ‚immer | 
Zahlen 

#TXT_SU_d-TXT 

PRT_TXT-#*-3 ıdc< 

+ 

WERTE-x*-3,X ;<<< 

MON_PRHX 

+TXT_SU_1-TXT 

PRT_TXT-#-3 <<< 

#1 

WERTE-*-3,X I<<< 

MON_PRHX 

#TXTSU_2-TXT 

PRT_TXT-#*-3 ER 


beiden Zahlen und leg das 
Speicher ab, 


* Gib die Summe aus, 


BRK 
LDA> 
JSR 


RTS 


* Drucke den Begrüßungstext. 


LDY 
BRK 
JSR> 


START 


* Addiere die 


BRK 
JSR> 


* Gib noch zwei Returns aus. 


JSR 
JSR 


* Verzweige in den Monitor. 


BRK 
BRK 


+9 
WERTE-#*-3,X = 
& 

WERTE-#-3,X ee 
WERTE-*-3,X <<< 
SUMME-#-3 East 
MON_PRHX 

% rg nr er Ep nr EEE m 
+TXT_ANF-TXT 
PRT_TXT-s-3 ıd<< 
beiden Zahlen. 
TESTSU-#+-3 dd 
MON_CR 
MON_CR 

Ko 
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von Dipl.-Inform. Dieter Greiner 
1. Was ist Pattern-Matching? 


Pattern-Matching (PM) ist ein Verfahren, 
bei dem versucht wird, einen Ausdruck 
(Muster, Pattern) durch Ersetzen der darin 
enthaltenen Variablen an einen anderen 
Ausdruck, der keine Variablen enthält, an- 
zugleichen (gleichmachen, matchen). Da- 
zu ein kurzes Beispiel: Wir wollen die Aus- 
drücke f(X,X,1) und f(2,2,1) matchen, wo- 
bei X im ersten Ausdruck eine Variable 
bezeichnen soll. Dazu wird die Variable X 
im ersten Ausdruck durch „2“ ersetzt. Der 
Match-Prozeß wäre jedoch erfolglos ver- 
laufen, hätte der 2. Ausdruck f(2,1,1) ge- 
lautet, denn erstes und zweites Argument 
sind verschieden (2<>1); deshalb kön- 
nen die beiden Ausdrücke nicht angegli- 
chen werden. 

Besondere Bedeutung haben PM-Verfah- 
ren durch ihre Anwendungen in der Künst- 
lichen Intelligenz (Kl; Artificial Intelligence 
= Al) erlangt. Beispiele: 

— Maschinelle Sprachverarbeitung: Erken- 
nung von Satzmustern 

— Intelligente Datenbanksysteme: Anfra- 
gen werden als Muster mit Variablen for- 
muliert 

- Expertensysteme: Mustererkennung 
spielt eine wichtige Rolle in der sog. Infe- 
renzmaschine 

- Logikprogrammiersprachen, Produk- 
tionssysteme und Theorembeweiser: Dort 
trifft man meist das leistungsfähigste PM- 
Verfahren an, nämlich die sog. Unifikation. 
(Bei der Unifikation dürfen beide anzuglei- 
chenden Ausdrücke Variablen enthalten.) 
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2. Pattern-Matching in Applesoft 


Hier sind anstelle von Ausdrücken zwei 
normale BASIC-Strings gegeben, die ge- 
matcht werden sollen. Der erste String, 
der auch Muster (Pattern) genannt wird, 
kann neben ganz gewöhnlichen ASCII- 
Zeichen auch noch 4 Arten von speziell 
gekennzeichneten Variablen enthalten: 

1. Segmentvariablen (Kennzeichen: „#) 
2. anonyme Segmentvariablen (Kennzei- 
chen: „x*“) 

3. Elementvariablen (Kennzeichen: „/”) 
4. anonyme Elementvariablen (Kennzei- 
chen: „?") 


Auf nicht-anonyme Variablen sollte nach 
dem „#" oder „/“ eine Ziffer zwischen 0 
und 9 folgen, die die Nummer der Varia- 
blen angibt. Wird die Ziffer weggelassen, 
setzt das Programm die Nummer 0 ein. 
Beispiele für Muster sind: 


NABCHI" 
"/OHL#L" 


: #1 ist Segmentvariable 
: /ß ist Elementvariable und 
+1 Segmentvariable 
u : / ist die Elementvariable 
nit der Nummer 9 
: * ist anonyme Segmentvariable 
: String enthält 2 anonyme 
Elementvariablen 


"ABCHE" 
AB??TE" 


Der zweite String ist als reine Zeichenket- 
te zu betrachten, deren Zeichen keine be- 
sondere Bedeutung haben. Dieser String 
wird im folgenden Maichstring genannt, 
weil er gegen das Muster „gematcht“ 
wird. 

Das Problem beim PM besteht nun darin, 
alle Variablen im Muster so zu ersetzen, 


Leistungsfähiger 
Pattern-Matcher fur 
Applesoft-Strings 





daß Muster und Matchstring gleich wer- 
den. Dabei kann wegen der fehlenden Nu- 
merierung jede der anonymen Variablen 
im Muster durch einen anderen String er- 
setzt werden. Für die Ersetzung gelten 
folgende Regeln: 

1. Segmentvariablen dürfen durch einen 
beliebig langen, evtl. auch leeren String 
ersetzt werden. 

2. Elementvariablen dürfen nur durch ei- 
nen String der Länge 1, d.h. durch ein 
einzelnes Zeichen ersetzt werden. 

Ist obiges Problem lösbar, so sagt man 
auch kurz, daß Muster und Matchstring 
gegeneinander „matchen”. 


3. Aufruf von Applesoft aus 


Der Pattern-Matcher erhält 3 oder 4 Argu- 
mente, das vierte Argument ist’ optional. 
Von Applesoft aus wird der Pattern-Mat- 
cher mit folgender Anweisung aufgerufen: 


CALL 37981, <Muster>, <Matchstring>, 

<Matchresultat>, 

<Name eines Stringarrays> 

= optional) 
Erläuterung: 
<Muster> ist der Name einer Stringvaria- 
blen, die das unter Punkt 2 beschriebene 
Muster enthält. 
<Matchstring> ist der Name einer String- 
variablen, die den unter Punkt 2 beschrie- 
benen Matchstring enthält. 
<Matchresultat> ist der Namen einer In- 
tegervariablen, die nach Rückkehr aus 
dem Pattern-Matcher den Wert 1 enthält, 
falls <Muster> und <Matchstring> mat- 
chen; sonst enthält sie den Wert ©. 
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<Name eines Stringarrays> ist der Name 
eines eindimensionalen Stringarrays, das 
mindestens 10 Arrayelemente enthalten 
und vor dem Aufruf dimensioniert worden 
sein muß. Falls <Muster> und <Match- 
string> matchen, enthält dieser Array die 
Ersetzungen für die nicht-anonymen, nu- 
merierten Segment- und Elementvaria- 
blen, wobei der i-te Eintrag im Stringarray 
der Ersetzung der Segment/Elementvaria- 
blen mit der Nummer i entspricht. Das 
Argument (einschließlich des vorausge- 
henden Kommas) ist optional und muß nur 
angegeben werden, wenn in <Muster> 
numerierte, d.h. nicht-anonyme Variablen 
vorkommen. 


4. Programmeingabe und Fehler- 
meldungen 


Das Programm wurde mit Hilfe des Big- 
Mac-Assemblers von G. Bredon unter 
dem Betriebssystem DOS 3.3 auf einem 
Apple II+ erstellt. Es enthält außer dem 
„="-Zeichen, das bei anderen Assem- 
blern durch „EQU“ und „EPZ“ (bei LISA 
2.5) zu ersetzen ist, keine außergewöhnli- 
chen Assemblerdirektiven oder Opcodes 
(z.B. vom 65002). Falls der Hex-Code 
direkt eingegeben wird, muß dies im Moni- 
tor ab Adresse $9400 erfolgen. (Die Ein- 
gabe von Hex-Codes wurde im Peeker- 
Doppelheft 12/84-1/85 im Artikel „Amper- 
sand macht's möglich“ von Dr. Jürgen B. 
Kehrel ausführlich beschrieben.) Nach der 
Eingabe im Monitor oder nach erfolgter 
Assemblierung wird das Programm durch 
„BSAVE MATCH, A$9400, 1509“ auf Dis- 
kette abgespeichert. 

Vor der ersten Benutzung muß der Initiali- 
sierungsteil des Programms aufgerufen 
werden, um es durch Versetzen des HI- 
MEM-Pointers vor Zerstörung zu schüt- 
zen. Da der Initialisierungsteil am Pro- 
grammanfang liegt, kann das Laden des 
Programms und seine Initialisierung mit 
dem Befehl BRUN MATCH erledigt wer- 
den. (Der Initialisierungsteil liegt unter HI- 
MEM und wird daher durch angelegte 
Strings zerstört.) Wichtig ist, daß die Pro- 
gramminitialisierung vorgenommen wird, 
bevor der BASIC-Interpreter Speicher- 
platz für irgendwelche Stringvariablen be- 
ansprucht. 


Das Array, das dem Pattern-Matcher im 
CALL-Aufruf als Argument übergeben 
werden kann, sollte zuvor dimensioniert 
werden, weil sonst ein OUT OF DATA 
ERROR erfolgt. Außerdem meldet der 
Rechner einen ILLEGAL QUANTITY ER- 
ROR, wenn das Array nicht eindimensional 
ist oder so dimensioniert wurde, daß es 
weniger als 10 Elemente umfaßt. 

Wurde dem Pattern-Matcher durch den 
CALL-Aufruf kein Stringarray als drittes 
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Argument übergeben und kommen im 
Muster dennoch numerierte Variablen vor, 
so bricht das Programm mit der Fehlermel- 
dung SYNTAX ERROR ab. 

Der Pattern-Matcher arbeitet rekursiv und 
benötigt zur Sicherung von Rücksprung- 
adressen und Speicherplatzinhalten den 
6502-Hardwarestack ($100-$1FF). Falls 
dem Programm unmittelbar vor einem re- 
kursiven Aufruf auf dem Stack nicht mehr 
als 12 Bytes zur Verfügung stehen, wird 
die Kontrolle dem BASIC-Errorhandler 
übergeben, der die Ausgabe der Fehler- 
meldung FORMULA TOO COMPLEX ver- 
anlaßt. Wurde das Error-Trapping nicht zu- 
vor mit „ON ERROR GOTO” angeschal- 
tet, bricht das laufende BASIC-Programm 
ab. 


5. Beispiele 


Die Tabelle (s. u.) gibt eine Übersicht über 
die Leistungsfähigkeit des Pattern- 
Matchers. Sämtliche Angaben beziehen 
sich auf den Aufruf „CALL 37901, 
A$,B$,RES%,C$", wobei das Array C$ 
mit „DIM C$(9)“ dimensioniert sein soll. 


6. Arbeitsweise des Programms 


Vor Aufruf des Pattern-Matchers sind alle 
Segment- und Elementvariablen unge- 
bunden, d.h. sie haben keinen Wert. Un- 
gebundene Stringvariablen sind dadurch 
gekennzeichnet, daß ihre 3 Deskriptoren- 
komponenten (Länge, Zeiger auf Zeichen- 
kette low und high) Null sind. Dies ist 
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sinnvoll, weil der BASIC-Interpreter Zei- 
chenketten nie in der Zero-Page abspei- 
chert und somit ungebundene Variablen 
eindeutig und leicht anhand der aritten 
Deskriptorenkomponente erkannt werden 
können. Im Laufe des Matching-Prozes- 
ses werden Segment- und Elementvaria- 
blen an Teilstrings des Matchstrings ge- 
bunden und wieder entbunden (ungebun- 
den gemacht), wenn sich mit einer Bin- 
dung keine Angleichung des Musters und 
des Matchstrings erzielen läßt. All dies 
geschieht nach einem systematischen 
Verfahren, das Backtracking (Zurücksetz- 
verfahren) heißt und im folgenden anhand 
der Behandlung von Segmentvariablen im 
Pattern-Matcher näher erklärt werden soll. 
Angenommen, wir wollen das Muster 
„#0“ gegen den Matchstring „HALLO“ 
matchen. Obwohl dieses Beispiel sehr 
einfach aussieht, verdeutlicht es, wie das 
Backtrackingverfahren funktioniert. 

Eine wichtige Rolle im Programm spielen 
die beiden Variablen P1 und P2, die stets 
die Position im Muster bzw. Matchstring 
angeben, bis zu der Muster und Match- 
string bereits gematcht sind. Beim ersten 
Aufruf von MATCH ist Pl =P2=0, weil 
noch nichts gematcht wurde. Anschlie- 
Bend probiert das Programm aus, wie lang 
das Segment ab Position P2 im Match- 
string sein muß, an das die Segmentvaria- 
ble #0 gebunden wird, damit auch der 
Reststring nach der Segmentvariablen im 
Muster und der Reststring im Matchstring 
matchen. Das Programm versucht es ZU- 
erst mit einem Segment der Länge Null 
und ruft dazu den Pattern-Matcher rekur- 
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siv mit den Positionen P1’=Pi+2 (#0- 
Segmentvariable ist gematcht — Über- 
springen des Strings „#0”) und Pa’r2 
auf (weil die Segmentvariable zuerst ge- 
gen ein Segment der Länge Null gematcht 
wird). Kehrt der Pattern-Matcher erfolg- 
reich aus seinem rekursiven Aufruf zurück 
(Zero-Flag = 1), so weiß er, daß Muster 
und Matchstring ab P1 und P2 matchen, 
und es wird aus der aktuellen MATCH- 
Inkarnation wiederum Erfolg gemeldet. In 
unserem Beispiel hätte der Pattern-Mat- 
cher keinen Erfolg, da im rekursiven Aufruf 
der (aussichtslose) Versuch unternommen 
wird, die Reststrings „“ und „ALLO” zu 
matchen. Deswegen setzt das Programm 
zurück („backtrackt“), d.h. es belegt die 
Variablen PI und P2 mit ihren alten Wer- 
ten, die vor dem rekursiven Aufruf auf dem 
Stack gesichert wurden, bindet die Seg- 
mentvariable #0 an ein Segment der Län- 
ge 1 ab Position P2 und ruft erneut den 
Pattern-Matcher auf, diesmal mit den Posi- 
tionen P1’=P1+2 und P2’=P2+1 (weil 
jetzt die Segmentvariable an das erste Zei- 
chen ab Position P2 im Matchstring ge- 
bunden ist). Dieser Aufruf wird wieder 
Mißerfolg melden, weil das Programm jetzt 
versucht, die Strings „“ und „LLO” zu 
matchen. 

Dieser rekursive Aufruf von MATCH und 
das anschließende Austesten eines um | 
längeren Segments wiederholt sich solan- 
ge, bis sowohl Pt als auch PZ am Ende 
des Musters bzw. Matchstrings angelangt 
sind, d.h. die Strings „“ und „“ gematcht 
werden, was zu einem Erfolg führt. (Zu 
diesem Zeitpunkt ist die Segmentvarlable 
+0 an den String „HALLO“ gebunden). 
Dieser Erfolg wiederum wird in die nächst- 
höhere Programmebene zurückgeliefert 
(Rücksprung mit RTS) und führt bei unse- 
rem Beispiel zum Setzen der dem Pro- 
gramm übergebenen Integer-Erfolgsvaria- 
blen. 


Beim Backtracking kann es mitunter vor- 
kommen, daß das Programm keine Mög- 
lichkeiten mehr hat, die Segmentvariable 
an ein noch längeres Segment des Match- 
strings zu binden, nämlich dann, wenn P2 
+ Segmentlänge > Länge des Match- 
strings ist. Ist dies der Fall, so wird die 
Segmentvariable entbunden und die aktu- 
ölle Inkarnation von MATCH meldet Mißer- 
folg. 

Natürlich muß eine Segmenivariable an- 
ders behandelt werden, wenn sie bereits 
an ein Segment gebunden ist. In diesem 
Falle wird zunächst überprüft, ob das Seg- 
ment, an das die Segmentvariable gebun- 
den ist, und der Teilstring gleicher Länge 
ab Position P2 im Matchstring gleich sind. 
Wenn nicht, wird das Zeroflag gelöscht, 
um Mißerfolg anzuzeigen und mit RTS in 
die aufrufende Routine zurückgesprun- 
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gen. Andernfalls wird Pl um 1 bzw. 2 (falls 
eine numerierte Segmentvariable vor- 
liegt), P2 um die Segmentlänge erhöht 
und an den Anfang von MATCH gesprun- 
gen, wo von neuem ab den Positionen P1 
und P2 gematcht wird. 


7. Einsatzgebiete des Programms 


Als Einsatzgebiete des Pattern-Maich- 
Programms kommen in Frage: 


1. Dialogprogramme: Das Paradebei- 
spiel für den Einsatz von PM-Verfahren ist 
das ursprünglich in LISP geschriebene 
Dialogprogramm ELIZA von J.Weizen- 
baum, bei dem sich der Benutzer einem 
Computerpsychiater anvertrauen kann. 
Das Programm erkennt dabei mit Hilfe ei- 
nes Pattern-Matchers vom Benutzer ein- 
gegebene Frage- und Antwortmuster und 
kann (oft) mit passenden Antworten und 
Gegenfragen reagieren. 


2. Chemische Datenbanken: Ein Chemi- 
ker interessiert sich z.B. dafür, bei wel- 
chen Molekülen zwischen zwei XYZ- 
Gruppen zwei weitere gleiche Gruppen 
vorkommen. Dazu muß man nur das Mu- 
ster  „aXYZa/titx/i#%XYZ# gegen 
alle in der Datenbank gespeicherten Mole- 
küle matchen und im Falle eines Matcher- 
folgs das entsprechende Molekül ausge- 
ben. (Die Kombination /14 ist notwendig, 
weil leere Gruppenbezeichnungen unsin- 
nig sind.) 


3, Assembler: Eine Assembler-Source- 
zeile hat meist den Aufbau 


<Label> <Mnemonic> <Operand> 
‚<Kommeniar> 


Dieses Muster kann mit Hilfe des Pattern- 
Matchers einfach erkannt werden, indem 
man die Sourcezeile gegen das Muster „/ 
541 /642 #3 ;#4“ matcht. (Die Element- 
variablen sind notwendig, weil Labelna- 
men und Mnemonics keine Leerstrings 
sein dürfen.) Bei Matcherfolg stellt die 
Konkatenation (Elementvariable 5 + Seg- 
mentvariable 1) den Labelnamen, die Kon- 
katenation (Elementvariable 6 + Segment- 
variable 2) das Mnemonic, die Segmeni- 
variable 3 den Operanden (evtl. leer) und 
die Segmentvariable 4 den Kommentar- 
text dar. Dem Autor ist ein in BASIC ge- 
schriebener MC68000-Assembler be- 
kannt, der PM zum Parsen des Quellcodes 
verwendet, 


4. Dateidienstprogramme: Ein gutes 
Beispiel hierfür ist das File-Verwaltungs- 
programm FID, das auf der DOS-3.3-Sy- 
stemdiskette mitgeliefert wird und die Ver- 
wendung von Wildcardzeichen (Jokerzei- 
chen) erlaubt. Diese Zeichen entsprechen 


unseren anonymen Segmenivariablen. 
Wildcardzeichen sind auch bei den Be- 
triebssystemen UCSD-Pascal und CP/M 
zur Spezifizierung von Filenamen erlaubt. 


5. INSTRING: Mit dem Pattern-Matcher 
kann auch der INSTRING-Befehl nachge- 
bildet werden. Angenommen, es soll über- 
prüft werden, ob der String „XYZ im 
String A$ enthalten ist. Das kann mit der 
folgenden Befehlsfolge geschehen: 


18 DIM C$(9) 
2% Bg=H Hr 2X YZUIH 
38 CALL 37901,B$,A$,RES%,C$ 


Falls der String „XYZ“ in A$ enthalten ist, 
enthält die Integervariable RES% nach 
Abarbeitung der Zeile 30 den Wert 1, wo- 
bei LEN(C$(0))+1 die Position angibt, an 
der „XYZ“ erstmals in A$ gefunden 
wurde. 


Das waren nur einige Beispiele, die zei- 
gen, wo sich Pattern-Matching vorteilhaft 
einsetzen läßt. Interessierte Peeker-Leser 
werden sicher noch mehr Anwendungs- 
möglichkeiten finden. Viel Spaß beim Mat- 
chen! 


Kurzhinweise 


1. Zweck: 

Pattern-Matching (Musterabgleichung) für 
Strings in Applesoft 

2. Konfiguration: 

Apple II+/e/c; DOS 3.3 (kein ProDOS 
wegen HIMEM-Änderung) 

3. Test: 

RUN MATCH.TEST 

A. Sammeldisk: 

MATCH.TEST (Demo-Programm) 
T.MATCH (Big-Mac-Quelltext) 

MATCH (Objektcode) 
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‘MATCH.TEST 79  ELVARC EQU 7! 
88 ASEGVARC EQU 'x' 
16 PRINT CHR$ (4)"BRUN MATCH, A$9400" 81 AELVARC EQU 7" 
15 MTCH = 37888 + 13 82 
20 DIM VB$(9): REM Array mit Variablenbindungen 85  x* Setzen des HIMEM-Pointers zum 
25 INPUT "Muster: ":MU$ | 84 # Schutz des Hauptprogramms 
35 INPUT "Matchstring: ";MA$ | 85  x* (INIT wird später durch 
35 CALL MTCH, MUS F MAS i MRZ, vB$ B6 # Strings überschrieben) 
4 PRINT 87 
45 IF NOT (MRZ) THEN PRINT "Strings matchen nicht!": 9Aaßd: AY PD 88  INIT LDA #ENTRY 
5Ö REM MRZ=1, Strings MU$ und MA$ matchen 94B4: 85 6F 9 STA FRETOP 
55 PRINT "Strings matchen !!!": PRINT : 94ß6: A9Y 94 9 LDA #ENTRY/256 
PRINT "Variablenbindungen: ": PRINT 9498: 85 74 92 STA HIMEMFI 
6d FOR I = 9) TO 9: PRINT el ;VB$L I) : NEXT I 9AdA: 85 78 93 STA FRETOP+1 
65 PRINT : PRINT : GOTO 25 9apc: 6p = BTS 
96 * Einlesen der Argumente und 
T.MATCH 97 * Plausibilitätstests 
98 
BSAVE MATCH, A$9400,1599 SAßD: BA 99 ENTRY TSX ;Rette 
| 1 94BE: 86 1D 199 STX SAVESP :SP 
1: PILTERTTELTTDE EEE er er eo nr 941: 28 BE DE 181 JSR CHECOM ;Komma! 
2 * % 182 
3 * PATTERN-MATCHER FÜUER APPLE- * 183 #& Lies 1. Argument <MU>, Zeiger 
4 * SOFT-STRINGS * 164 x auf <MU> steht nachher in 
6 * von: D. Greiner 1985 * 1085 x» (MU,MU+L), Länge in Ll 
13 . - . 186 
14 * * 9413: 28 ES DEF 197 JSR PTRGET 
15 + Installation: * 9416: AB 09 108 LDY #9 
17 x» BRUN MATCH, A37888 * 9418: Bl 83 189 LDA (VARPNT),Y 
18 % & 94AlA: 85 66 118 STA Li | 
19 Be m m m mn % 9416: C8 197 INY | 
2d * * 941D: Bl 83 ıle LDA (VARPNT),Y | 
21 * Aufrufformat: * SAlF: 85 97 113 STA MU 
22 % % 9421: C8 114 INY 
23 * CALL 37981, <MU>,<MT>,<MR>, <A>* ga22: Bl 83 115 LDA (VARPNT),Y 
24 * E: 9424: 85 $8 116 STA MU+l 
25 # <MU> Stringmuster, das Var- * 9426: 26 BE DE 117 JSR CHKCOM ; Komma ! 
26 * iablen enthalten darf E 118 
27 * <MT> String, gegen den <MU> x 1198 x Lies 2, Argument <MT>. Zeiger 
28 * gematcht werden soll * 128 x auf <MU> steht nachher in 
29 %* <MR> Name einer Integer-Var- « 121 x (MT,MT+l), Länge in 
3 * iablen, die das Match- * 122 + L2 
Ss 3 resultat (® oder 1) ent-« 123 
32 * hält E3 9429: 28 ES DF 124 JSR PTRGET 
353 # <A> Optionales Argument. Na-x 9a2C: AB 90 125 LDY +ß8 
34 * me eines Stringarrays, * 9A2E: 84 99 126 Se 
35 # das nach erfolgreichen * 9439: 8A FC 127 STY P2 
36 * Matchen die Variablen- + 9432: 84 FE 128 STY NUMSALLD 
Se * bindungen enthält * 9434: Bl 83 129 LDA (VARPNT),Y 
38 * * 9436: 85 F9 136 STA L2 
39 EEE Een 2 22222 22 22222 222 9438: C8 131 INY 
49 9439: Bl 83 132 LDA (VARPNT),Y 
al ORG 9499 37888 943B: 85 FA 133 STA MT 
42 943D: 08 134 INY 
43 * Applesoft-Routinen 943E: Bl 83 135 LDA (VARPNT),Y 
44 | 9440: 85 FB 136 STA MT+1 
45 CHRGOT EQU $B7 | 9442: 28 BE DE 137 JSR CHKCOM ;Komma! 
46 CHRGET EQU $Bl | 138 
47 CHKCOM EQU $DEBE | 139 x» Lies 3. Argument <MR>, welches 
48 PTRGET EQU $DFE3 148 x ersatzweise den Wert ® (<=> 
49 GETARYP EQU $F7D9 141 x& kein Match) hat. 
5% SYNERR EQU $DECY 142 
5l ILQNTERR EQU $E199 9445: 28 E3 DF 143 JSR PTRGET 
52 ERROR EQU $D41l2 9448: A9 G0 144 LDA #9 ;No Mtch 
53 944A: AB 145 TAY 
54 * Applesoft-Zeigervariable 944B: 91 83 146 STA (VARPNT},Y 
5 944D: C8 147 INY 
56 FRETOP EQU $6F 944E: 91 83 148 STA (VARPNT),Y 
57 HIMEM EQU $73 9459: 28 B7 BB 149 JSR CHRGOT 
58 VARPNT EQU $83 15% 
59 ARRPNT EQU $9B 151 & Optionales Argument <A> ange- 
6 152 » geben? 
6l * Programmvariablen 153 # Ja: Lies Argument, Setze 
| 62 154 * (ARRPNT,ARRPNT+1) auf 1, 
63 A EQU $ds 15 * Arrayelement 
64 MU EQU $97 ; <MU> 156 & Nein: Start des Matchers 
| 65 Pl EQU $89 157 
66 SL. EQU $19 9453: C9 20 158 CMP&#',!' 
67 ST EQU $1A 9455: DA 36 159 BNE START 
68 VAROFFST EQU $1C 9457: 85 FE 16% STA NUMSALLD :A<>B! 
69 SAVESP EQU $1D 161 
9 12 EQU $F9 162 x* <A>-Argument angegeben -> 
71 MT EQU $FA ;<MT> 163 x* Numerierte Variable erlaubt! 
12 Pz2 EQU $FC 164 
73 SAVE EQU S$FD 9459: 20 Bl 96 165 JSR CHRGET 
74 NUMSALLD EQU $FE 945C: 20 D9 F7 166 JSR GETARYP 
75 945F: AB BA 167 LDY #4 
18 x Variablenkennzeichnungen 9461: Bl 9B 168 LDA (ARRPNT),Y 
Et 9463: C9 Öl 169 CHP #1 ;DIM=1? 


78 SEGVARCH EQU '#' 9465: DB BC 178 BNE ILLEGAL 
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b. 
ii » 


56 


9467: 
9468: 
Ya6A: 
9460: 
946D: 
9AGF: 
g94aTrl: 
9473: 
9476: 
9478: 
9479: 
9aTB: 
9g4TD: 
947F: 


9481: 
9483: 
9485: 
9488: 
9489: 
948B: 


948D: 
9499; 
9492: 
9494: 
9496: 
9498: 


9499: 
943B: 
949D: 
9A9F: 
9ahl: 
943: 


94AA4: 
gaaßs: 
9AAB: 
9A: 
94aAc: 
Q4AE: 
9ABB: 


94B3: 
94B5: 
94BT: 
94B9: 
9ABB: 


9ABt: 
9ABE: 
gach: 
gace: 


Bl SB 
Do BA 


Bl '9B 
c9 BA 
BO 83 
ac 99 
A9 97 


65 9B 
85 9B 
9B 92 
E& SC 


a4 99 
c4 66 
DB 85 
AS FC 
65 F3 


Bl 97 
69 25 
FB 54 
9 RA 
DO 85 
ES 99 
ac 73 


95 


ya 

172 

173 

174 

175 

176 

177 

178 

179 

189 

181 

182 

183 

184 

185 
186 
187 
188 
189 

199 

191 

192 

193 

194 

195 
196 
197 
198 
199 

208 

201 

202 

283 

294 
295 
206 
207 
268 
209 
210 
21l 
212 
213 
214 
215 
216 
217 
218 
219 
220 
221 
222 
223 
224 
225 
226 
227 
228 
229 
230 
231 
232 
233 
234 
235 
236 
237 
238 
239 
240 
241 
242 
243 
D44 
245 
246 
247 
248 
249 
2506 
251 
252 
253 
254 
255 
256 
257 
258 
259 
269 
261 
262 


INY 
LDA ({ARRPNT),Y 
BNE OK 
INY 
LDA (ARRPNT),Y 
CMP #18 
BES OK 
ILLEGAL JMP ILQNTERR 
OK LDA #7 
CLC 
ADC 
STA 
BCC 
INC 


ARRPNT 
ARRPNT 
UNBIND 
ARRPNT+1 


x Entbinden der ersten 19 
* Variablen von <A>. Index=ß..9 


LDY #ß 
LDX #9 
JSR UNBNDVBL 
INX 
CPX 
BNE 


UNBIND 
UNBINDI1 


+19 
UNBIND1l 


x Top-Level-Aufruf des 
* Pattern-Matchers 


START JSR MATCH 
BNE NM 
LDA #1 ‚Match 
LDY #9 ;war 
STA A(VARPNT),Y ;mögl. 
NM RTS 


PRFRTETEETETTTUT ED I 0 2 02 2202 32 22 2 0000 


MATCH ist der eigentliche 
Pattern-Matcher. MATCH kehrt 
mit Zeroflag=1 zurück, falls 
<MU> und <MT> ab den Positi- 
onen Pl {in <MU>) und P2 {in 
<MT>) matchen 


KEREEE * 
aerreerkke 


PERETESERTITUTELL I 20 I 2 202 022 2023 20 


LDY PI 

GES el 

BNE NOTEND 
LDA P2 

CMPU 9 L2 

RTS 


MATCH 


* Noch nicht am Ende von <MU>. 
* Accu:=Akt. Zeichen von <MU> 


LDA 
CMP 
BEQ 


NOTEND (MU),Y 
#SEGVARCH 
SEGMENT 
CMP #ASEGVARG 
BNE NOSEGVAR 
ING Pl 


JMP BCKTRCKZ 
* Keine Segmentvariable. Wenn 
* in <MT> bereits am Ende, kein 


* Match 


NOSEGVAR LDX PR 


cGPX L2 
BCC TEST 
NOMATCHH LDA #1 ;Kein 
RTS :Match! 
* Untersuche weiter, ob in <MU> 


x Elementvariable vorliegt. 
TEST CMP 
BEQ 
CMP 
BEQ 


#+ELVARC 
ELEMENT 
#AELVARC 
TESTZ 


* Für Match müssen Zeichen in 
* <MU> und <MT> gleich sein. 


TESTI EDr opz 
CMP_ (MT).,Y 
BNE NOMATCH 
TEST2 ING Pl ;:Check 
TESTS INC P2 ‚next! 
BNE MATCH immer! 





9AaDB: 
9ADS3: 


94D5: 
94DT7: 
94D9: 
O94ADB: 
9ADD: 
SADF: 


YAEl: 
9AES: 
94E5: 
94AES: 
94ABA: 
94AEB: 
9AED: 
9AEF: 
9AF?2: 
9AFS: 
9arT: 
94F8: 
94AF9: 
9AFC: 


SAFE: 
9501: 


9503: 
9594: 
95B6: 
9588: 
S5BA: 
9550: 
S5PE: 
SsLl; 
9513: 
95186: 
9518: 


951A: 
951C: 
S5lE: 
9529: 
9522: 
9525: 
9527: 
OD2A: 
952C: 
9E2RD: 
S52E: 


9539: 
9532: 
9534: 
9535: 
9536: 
9537: 


29 
FÖ 


A9 
AA 
2d 
A5 
48 
E6 
E6 
28 
28 
F® 
68 
A8 
20 
Fo 


28 
F® 


18 
A5 
65 
Fö 
BÖ 
AS 
8D 
A5 
8D 
A2 
AA 


A2 95 
Bc 


81 
IC 
DD 95 
IC 


89 
FC 
EF 95 
99 94 
5D 


94 95 
BB 


A2 95 
2D 


19 
FC 
d2 
AD 
1A 
28 95 
1B 
29 95 
DR 
FC 


19 
a7 
FC 
89 
99 94 
FA 
FF FF 
8D 


BA 


1) 
1C 


DD 95 


263 
264 
265 
266 
267 
268 
269 
270 
271 
272 
273 
274 
275 
276 
277 
278 
279 
289 
281 
282 
283 
284 
285 
286 
287 
288 
289 
299 
291 
292 
293 
294 
295 
296 
297 
298 
299 
308 
301 
302 
303 
394 
3085 
386 
307 
308 
389 
319 
sl 
312 
313 
314 
315 
316 
317 
318 
319 
328 
321 
322 
323 
324 
325 
326 
327 
328 
329 
359 
331 
332 
333 
334 
335 
336 
337 
338 
339 
340 
341 
342 
343 
344 
345 
346 
347 
348 
349 
359 
351 
352 
353 
354 


* Behandlung 


ELEMENT JSR 
BEQ 


”„** %* #* 


LDY 
LDA 
LDY 
CMP 
BEQ 
BNE 


E ur Zur Ze Zu Ze Zu = 


EVNOTBND LDA 
LDY 
JSR 
LDA 
PHA 
ING 
INC 
JSR 
JSR 
BEQ 
PLA 
TAY 
JSR 
BEQ 


* Behandlung 
+ variablen 


SEGMENT JSR 
BEQ 


Eu Ze Se Ze Ze Ze: 


Match" 


CLC 
LDA 
ADC 
BEQ 
BCS 
LDA 
STA 
LDA 
STA 
LDX 
LDY 


WITHIN 


Elementvar. 
Binde Variable und rufe 
MATCH rekursiv mit dieser 
Bindung auf, Falls Match 
nicht erfolgreich ist, ent- 
binde Variable wieder und 
melde "No Match" 


von Elementvar. 


GETOFFST 
EVNOTBND 


(MT),Y 
TEST2 
NOMATCH 


ist nicht geb, 


#1 
VAROFFST 
BINDVBL 
VAROFFST 


Pl 

PR 
CHKDEPTH 
MATCH 
GOODLl 


UNBNDVBL 
NOMATCH 





Elementvar. ist gebunden. Vgl. 
erstes Zeichen mit aktuellen 
Zeichen in <MT>. Für Match 
müssen beide gleich sein 


‚or! 
‚BAD! 


von num. Segment- 


GETOFFST 
SVYNOTBND 


NOMATCH 
ST 

PL+1 
ST+l 
PL+2 

+D 

P2 


Behandls gebundene Segment- 
variable. Überprüft wird, 
ob das Segment der Länge SL 
ab Position P2 in <MT> gleich 
dem gebundenen Segmentstring 


ist. Wenn nicht, liefere "No 


* Vergleichsschleife zum Vergl, 
* obiger Stringsegmente 


CPLOOP CPX 
BNE 
MM STY 
INC 
JMP 
PL1 LDA 
PL CMP 
BNE 
ON INA 
INY 
BNE 


* Behandlung 


SL 

PL1 

P2 

Pl 
MATCH 
(MT) ,Y 
SFFFF,X 
NOMATCH 


CPLOOP 


nichtgebundener 


* num. Segmentvar. Prinzip: 


EBACHKT 


SVNOTBND LDX 
LDY 
BCKTRCKI TYA 
PHA 
TXA 
JSR 


RACKING 


+ 
VAROFFST 


BINDVBL 
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355 %*+ Rette auf Stack (wegen 446 
356 *+ rek. Aufruf v. MATCH}: 447 %* Entbinde die Variable mit 
357 * Pl: Position in <MU> 448 x Offset Y in <A> 
358 # P2: Position in <MT> 449 
359 * X-Reg.: Segmentlänge 9594: A9 98 450 UNBNDVBL LDA #® 
360 9596: 91 SB 451 STA (ARRPNT),Y 
953A: Ab 99 361 LDA P1 9598: C8 452 INY 
9550: 48 362 PHA 9599: 91 9B 453 STA (ARRPNT),Y 
953D: A5 FC 363 LDA P2 959B: C8 454 INY 
953F: 48 364 PHA 959C: 91 9B 455 STA (ARRPNT),Y 
954B: 8A 365 TXA 959E: C8 456 INY 
9541: 48 366 PHA 959F: A9 BB As LDA #9 
9542: 18 367 CLC | 95A1:-69 458 RTS 
9543: 65 FC 368 ADC P2 459 
9545: 85 FC 369 STA P2 | ; 4680 * Liefert in VAROFFST den 
9547: E6 99 379 INC Pl A6l x Offset der numerierten Var., 
9549: AB EF 95 371 JSR CHKDEPTH 462 % auf die Pl zeigt. (ST,ST+H) 
9540: 28 99 94 372 JSR MATCH 4563 x zeigt auf den Stringtext 
954F: DB 97 as BNE BT A464 x dieser Variablen, SL gibt 
374 465 # die Länge des Stringtexts 
375 x Match! 466 x an. Falls die Variable unge- 
376 467 % bunden ist, kehrt GETOFFST 
9551: 68 “tt PLA 468 x* mit Zeroflag=1l zurück 
9552: 68 378 PLA | 469 
9553: 68 379 GOOD PLA | 95A2: AS FE 478 GETOFFST LDA NUMSALLD 
9554: 68 380 GOODL PLA 95AA4: DB 96 al BNE ALLOWED 
9555: A9 BB 381 LDA #9 ;Zel! 9546: AG 1D aTz LDX SAVESP 
9557: 69 382 RTS 9548: 9A 473 TXS 
383 9549: AG C9 DE 474 JMP_ SYNERR 
384 + Rek. Aufruf lieferte S5AC: E6 99 475 ALLOWED INC Pi 
385 %* "No Match" -> Stelle | S5AE: A4 99 476 LDY Pl 
386 # alte Werte von Pl, 95BB: CA 6 477 CPY L1 
387 #* P2 und X-Reg. wieder 95B2: BO 97 478 BCS DEFVAL 
388 # her, probiert, falls 95B4: Bl 97 479 LDA (MU),Y 
389 « möglich, ein läng- 95B6: 38 489 SEC 
398 * eres Segment (X-Reg. 95B7: E9 30 a8l SBC #'8' 
391 * erhöhen) ab Pos. 95B9: BB 97 482 BCS GRÖ 
392 x P2 in <MT> S5BB: C6 99 483 DEFVAL DEC Pl 
393 95BD: A9 BB 484 LDA #9 
9558: 68 394 BT PLA S5BF: 18 485 tLC 
9559: AA 395 TAX 95C9: 98 99 486 BCC SOFFS 
955A: 68 396 PLA 9502: C9 BA 487 GR® CMP_ #19 
955B: 85 FC SaT STA P2 95C4: BB F5 488 BCS DEFVAL 
955D: 68 398 PLA 9506: 85 FD 489 STA SAVE 
9S55E: 85 99 399 STA PI | 9568: BA 499 ASL 
9560: 68 400 PLA | 9509: 65 FD 491 ADC SAVE 
aml 95CB: A8 492 SOFFS TAY 
Aß2 x Y-Reg erhält Offset 95CC; 85 1C A93 STA VAROFFST 
A483 %* der Segment-Variablen 95CE: Bl 9B 494 LDA (ARRPNT),Y 
404 95DB: 85 19 495 STA SL 
9561: AB 485 TAY 95D2: C8 496 INY 
9562: E8 ad6 INX 95D3: Bl 9B 497 LDA (ARRPNT),Y 
95653: BA 407 TXA 95D5: 85 1A 498 SEA UST 
9564: 18 488 EEG 95D7: 68 499 INY 
9565: 65 FC 49 ADC P2 95D8: Bl SB 5%8 LDA {ARRPNT),Y 
93567.209.E9 419 CMP L2 95DA:; 85 1B 5ßl STA ST-l 
9569: 98 C9 all BCC BCKTRCK1 95DC: 69 592 EXIT RTS 
956B: FB C7 412 BEQ BCKTRCKI 505 
956D: 28 94 95 413 JSR UNBNDVBL 504 * Weise an die Variable im 
Al4A 505 »* Array <A> mit Offset Y das 
415 + Alle Möglichkeiten für 566 * Segment ab Pos, PZ2 in <MT> 
A416 x* Segment in <MT> er- 507 * mit Länge=<ACCU> zu 
417 x» schöpft. Kein Erfolg-> 588 
418 * liefere "No Match” 95DD: 91 SB 5089 BINDVBL STA (ARRPNT),Y 
419 95DF: C8 519 INY 
9578: A9 1 429 LDA #1 Zap! 95EB: 18 Eıl CLC 
9572: 69 421 RTS S5El: A5 FC 512 LDA P2 
422 95E3: 65 FA 513 ADC MT 
423 x Backtracking zur Behandlung 95E5: 91 9B 514 STA (ARRPNT),Y 
424 x% anonymer Segmentvariablen 9S5E7: A9 99 515 LDA #0 
425 x& Vgl. Code für Behandlung 95E9: 65 FB 516 ADC MT+Hl 
426 %# numsrierter Segnmentvar. O5EB: C8 517 INY 
427 9S5EC: 91 SB 518 STA (ARRPNT).,Y 
9573: A5 99 428 BCKTRCK2 LDA PI O5EE: 69 519 RTS 
9575: 48 429 PHA 520 
9576: A5 FC 430 LDA P2 521 %* Überprüfe, ob noch genügend 
9578: 48 431 PHA | 522 % Platz für rekursiven Aufruf 
9579: 28 EF 95 432 JSR CHKDEPTH 523 # auf dem Stack vorhanden ist 
S57C: 28 99 94 453 JSR MATCH 524 
957F: FÖ D2 434 BEQ GOOD 9S5EF|: BA 525 CHKDEPTH TSX 
9581: 68 435 PLA 95FBt EB BA 526 CPX #18 
9582: 85 FC 436 STA P2 S5F2} BB 98 527 BCS TIEFEOK 
9584: 68 437 PLA OS5FA! A6 1D 528 LDX SAVESP 
9585: 85 89 438 STA PI S5F6! 9A 529 TXS 
9587: E6 FC 439 INC P2 | 95F7: A2 BF 530 LDX #191 
9589: A6 FC 44 LDX P2 | 551 
S58B: EA F9 44] CPX L2 532 * X-Reg enthält Code für 
958D: 99 EA 442 BCC BCKTRCK2 9355 %* "FORMULA TOO COMPLEX" 
958F: FÖ E2 443 BEQ BEKTRCK2 534 
9591: A9 Bl 444 NO LDA #1 Zel 95F9: AC 12 D4 535 JMP ERROR | 
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von Thomas Schneider 
1. Anwendungsgebiet 


Das UCSD-Programm LONGINT unter- 
stützt die Ein- und Ausgabe von Festkom- 
mazahlen auf der Basis des im UCSD- 
System implementierten Datentyps Long 
Integer. 

Das Programm bewährt sich vor allem bei 
Anwendungen, bei denen es auf die Ge- 
nauigkeit von Beträgen ankommt, die bei 
Real-Zahlen nicht gegeben ist. Es ist des- 
halb im gesamten kaufmännischen Be- 
reich von großem praktischem Nutzen. Bei 
der Eingabe wurden umfangreiche Plausi- 
bilitätskontrollen vorgesehen, so daß da- 
mit auch Programme für absolute EDV- 
Laien erstellt werden können. 


2. Programmaufbau 


Die in dieser Unit zusammengefaßten 
Routinen ermöglichen die Ein-/Ausgabe 
von sog. Long-Integer-Zahlen. Sie sind 
lauffähig unter dem Apple UCSD-Pascal- 
System, Version 1.1. 

Long-Integer-Zahlen haben im Gegensatz 
zu den normalen Integer-Zahlen im Pas- 
cal-System eine maximale Größe von 36 
Dezimalziffern und ermöglichen damit ge- 
nauere Rechnungen als Real-Zahlen - al- 
lerdings nur im ganzzahligen Bereich. Ver- 
wendet man aber Festkommazahlen, die 
bei der Addition und Subtraktion densel- 
ben Gesetzen wie die ganzen Zahlen ge- 
horchen, so ist es möglich, Intern mit der 
kleinsten vorkommenden Einheit zu rech- 
nen, wenn nur die Ein/Ausgabe im ge- 
wohnten Festkommaformat erfolgt. So ist 
es insbesondere im kaufmännischen Be- 
reich empfehlenswert, intern mit Pfenni- 
gen zu rechnen, die Beträge jedoch in 
gewohnter Weise in DM und Pfennigen 
auszugeben, z.B. DM 1,24. 

Dies ist genau die Funktion, die durch die 
Routinen realisiert wird. 


Entwickelt wurden die Routinen bei der 
Implementierung eines Programms zur 
Kontoverwaltung, nachdem klar wurde, 
daß normale Integer-Zahlen zu klein (mit 
DM 325,75 kann ich gerade 1 1/2 Monate 
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Long-Integer-Routinen 
in UCSD-Pascal 


BAFöG ausrechnen) und Real-Zahlen zu 
ungenau sind. 

Die Routinen wurden in einer Unit organi- 
siert, um sie nach Einbinden in die Sy- 
stembibliothek SYSTEM.LIBRARY immer 
verfügbar zu haben. Natürlich ist es auch 
möglich, sie direkt in ein Programm einzu- 
bauen. Dazu muß man beachten, daß fol- 
gende Bezeichner global vereinbart und 
initialisiert werden: 


CONST long : maximale Größe der 
Integerzahlen (max. 36) 

TYPE int_long = integer[long]; 

VAR bell,bs char: 

{Piepston und Backspace} 

integer; {Anzahl der 

Nachkommastellen} 


nachkomma : 


3. Die Unterprogramme 


Die Unit besteht im wesentlichen aus 3 
Unterprogrammen: 

— Procedure sei_nachkomma: legt die An- 
zahl der Nachkommastellen fest. 

— Procedure write_long: gibt eine Zahl auf 
der Konsole aus. Die Zahl wird mit der 
Anzahl der angegebenen Nachkomma- 
stellen rechtsbündig in einem Ausgabefeld 
mit „feld“ Stellen ausgegeben. Wird 
„feld“ zu klein angegeben, werden statt 
dessen Sternchen ausgegeben. 

— Procedure read_long: Dies Ist die um- 
fangreichste Prozedur, weil sie eine ganze 
Reihe von Plausibilitäts- und Fehlerkon- 
trollen enthält. 


Der Initialisierungsteil umfaßt lediglich die 
Initialisierung der Variablen bs und bell 
(chr(8) und chr(7)) und den Defaultwert für 
die Nachkommastellen {2). Als Trennzei- 
chen für die Nachkommastellen kann ein 
Punkt oder ein Komma eingegeben wer- 
den. Die Ausgabe erfolgt jedoch immer mit 
einem Punkt. 

Je nach Anwendungsfall können auch ver- 
schiedene Änderungen eingebaut 
werden: 

Wird die Ausgabe auf ein anderes Gerät 
als die Konsole gewünscht (z.B. auf Dis- 
kette), kann die Parameterliste der Proze- 
dur write_long um einen Parameter „out“ 
vom Typ „text“ erweitert und die Write- 
Anweisung geändert werden. 











Die Überprüfung der Nachkommastellen 
kann dahingehend abgeändert werden, 
daß überzählige Nachkommastellen ein- 
fach abgeschnitten werden oder daß ge- 
rundet wird. 

Bei Bedarf können Routinen für Multiplika- 
tion und Division eingefügt werden. 

Auf eine Kleinigkeit möchte ich noch be- 
sonders hinweisen: In der Prozedur 
read_string muß die Range-Check-Option 
des Compilers ausgeschaltet werden, da 
auf die einzelnen Elemente des Strings 
indiziert zugegriffen wird. Durch das Ab- 
schalten der Option wird eine Überprüfung 
der Indizes auf ihre Gültigkeit verhindert. 
Dies wird durch die Routine selbst erle- 
digt. 


Kurzhinweise 


1. Zweck: Ein- und Ausgabe von Long- 
Integer-Zahlen 

2. Konfiguration: 

II+/e/c, UCSD-Pascal 1.1 

3. Test: 

E(xecute Demo 

4. Ssammeldisk: 

DEMO.TEXT (Testprogramm) 
LONGINT.TEXT (Unit-Quelltext) 

5. Wie man Units erstellt, wird im Pascal- 
Kompaktkurs, Teil 2 (Heft 12/86) be- 
schrieben. 


DEMO.TEXT 


program int; 

uses long_integer; 

var long i: integer[long]; 
: integer; 


write ("Anzahl der Nachkommastellen: ' 
readln {n}); 

set_nachkomma {n)}; 

write ('Bitte eine Zahl eingeben: ' 
read-long (long_i); 

writeln; 

write ('Die Zahl lautet: u 
write_long (long_i,15): 

writeln; 

writeln; 

writeln; 

write ('Noch einmal? (j/n)');read {ch}; 
writeln; 

untılcch.n Na), 
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LONGINT.TEXT 


{$S+} 

unit longinteger; intrinsio code 23 data 24; 
interface 

const long = 18; 

type int_long = integer[long]; 


procedure read.long (var int: int_long):; 
procedure write_long (int: int_long; feld: integer); 
procedure set_nachkomma (i: integer); 


implomentation 
var bell,bs : char: 
nachkomma : integer:; 


procedure read_long; 
const longl = 36; {maximale Zahlenlaenge = 36 digits} 
type int_string = string[longl]; 
var ok,neg: boolean; 
is : int_string; 
fak,z,laenge_is,i,point_pos : integer; 


procedure read_string (var is : int_string); 
var ch: char; 
ziffer_anzahl,i : integer; 
legal : set of char: 
ziffern : set of 'B',.'9'; 
dez_zeichen : set of !',',.',1; 
point : boolean; 
begin 
if nachkomna = ® 
then dez_zeichen := [] {Keine Nachkommastellen} 
else dez zeichen := [',','.!]: 
ziffern := ['B'..'9']; 
legal := ziffern + ['-','+'] + dez_zeichen;{erlaubte Zeichen) 
i :=ß; {Index fuer String} 
ziffer-anzahl := ß; {zaehit die eingegebenen Ziffern} 
point := false; {Merker fuer Dez.-Punkt/Komma} 


{$R-} 
{Range-Check abschalten} 
{notwendig bei der Indizierung des Strings} 
repeat 
read (keyboard,ch); {Zeichen einlesen, aber nicht ausgeben} 
if ch in legal 
then begin 
write (ch); 
if ch = bs then begin 


write {' ',bs); 

if is[i] = '.' then point :-= false; 

if is[i] in ziffern then 
ziffer_anzahl := ziffer_anzahl-—]l; 

i :=i-l; 

end 

else begin 

i := it; 

{evtl. Dez.-Komma in Dez.-Punkt umwandeln: } 

ifch = ',' then ch ;:= !.'; 

if ch = '.' then point := true; 

if ch in ziffern then 
ziffer_anzahl := ziffer_anzahl+l; 

is [i] := ch; 

end; 


{Menge der zulaessigen Zeichen fuer die} 
{naechste Eingabe bestimmen:} 

if ziffer_anzahl >= longl 

then legal := [bs] 


else 
a ! 
then legal := ziffern + ['-','+'] + dez_zeichen 
else 
if point 
then legal := ziffern + [bs] 
else legal := ziffern + [bs] + dez_zeichen: 
end 


else {Falls illegales Zeichen gegeben wurde: Piepston} | 
if not eoln (keyboard) then write (bell): 
until eoln (keyboard); 


ifi=9 

then is ;= '!f' {Es wurde nur 'RETURN' eingegeben) 
else is [ß] := chr (i); {Laenge eintragen} 

{$R+} 

end: 
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ucsd 24 


begin 

repeat 
ok := true; 
read_string (is): 
laenge_is := length (is); 


{Position des Dezimalpunktes bestimmen und, } 
{falls vorhanden, entfernen} 


point_pos := pos(!.' is); 
if point_pos <> ß then delete (is,point_pos, 1); 
if point_pos = ß then point_pos := laenge_is; 


{Falls kein Punkt: Punkt am Ende} 


{Anzahl der anzuhaengenden Nullen bestimmen} 
fak := nachkomma — (laenge_is — point_pos); 


{Fehler, falls zuviele Nachkommastellen eingegeben wurden} 
{oder die Anzahl der Ziffern nach dem Einfuegen der} 
{Nullen zu gross wuerde,} 
if (fak < 8) or (length(is) + fak > long) then begin 

ok := false; 

write (beill}; 

{Cursor zurueck auf den Anfang und Eingabe loeschen} 


for i := 1 to laenge_is do write [bs,' ',bs): 
end; 
until ok; 
neg := false: 
int ;:= ß; 


{erforderliche Nullen anhaengen:} 
for i :=1 to fak do is := concat (is, 'ß'); 


{Vorzeichen bestimmen und ggf. entfernen:} 


if is[l] in ['+','-'] then begin 
if is[l1] = '-' then neg := true; 
delete {is,1,1); 
end; 


{jetzt besteht der String nur noch aus Ziffern!} 


{String in Integerzahl umwandeln:} 

i:=6 

laenge_is := lengthlis); 

{Laenge nach diesen Manipulationen neu bestimmen) 
while i < laenge_is do begin 


i := itl; 
z := ord{is[i]) - ord('B'); 
int := int#1ß + z; 
end; 
if neg and (int <> ß) then int := -int; 


end; 


procedure write_long; 
var is : string[38]; {max. 36 digits+VorzeichentDezimalpunkt} 
laenge_is,i : integer; 


begin 
str (int,is); (Integerzahl in String umwandeln} 
laenge_is := lengthfis):; 


{Falls erforderlich Nullen einfuegen} 
if (int < ®) and (laenge_is-l <= nachkomma) then 


for i := laenge_is-1l to nachkomma do insert ('ß',is,2) 
else if laenge_is <= nachkomma then” 
for i := laenge_is to nachkomma do is := concat {('$' is); 


{Falls Nachkommastellen erforderlich: Dezimalpunkt einfuegen} 
if nachkomma <> ® then insert ('.',is,length(is)-nachkomma+tl); 


{Ausgabe; Falls Zahl zu lang fuer das spez, Ausgabefeld:) 
{Entsprechend viele Sternchen ausgeben.} 
if length(is) > feld then 


is != copy esse! , 1, feld); 
write (is:feld)}; 
end; 


procedure set_nachkonna; 
begin 
nachkomma :=i; 
end; 
begin 
{Initialisierung} 
bs := chr (8); {Backspace} 
bell := chr (7); ({Piepston} 
nachkomma := 2; {Defaultwert} 
end. 
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Readin-Prozedur fur 
Ganzzahlen 


Eine Utility für USCD-Pascal 


von Norbert M. Doerner 
Ausgangslage 


Eine der unangenehmsten Eigenschaften 
des Apple-Pascal-Betriebssystems ist 
wohl die reichlich unfreundliche Reaktion 
auf einen falschen Tastendruck bei der 
Eingabe von Integer-Zahlen. Tippt man 
beispielsweise auf „A", verabschiedet 
sich das Programm mit „/O-Error: bad 
input format", und die bereits verarbeite- 
ten Daten sind verloren. Da mir das auch 
schon häufig passiert ist, machte ich mich 
an die Arbeit und entwickelte die hier ab- 
gedruckte Prozedur. 


Prozedur Readin 


Die Prozedur besteht aus drei Teilen: 

1. Der momentane Wert der einzulesen- 
den Variablen wird initialisiert und ausge- 
geben. Dadurch kann dieser unverändert 
übernommen werden, eine Möglichkeit, 
die die Read-Prozedur nicht bietet. 


READIN.TEXT 
(Readin-Prozedur mit Testprogramm) 


program test; 
var x:integer; 


Procedure Readin (var wert : integer); 
{von Norbert M. Doerner, 1985} 
const max = 5; 
8; 
13: 
RL; 
29, 


backspace 
return 
right 
clearEOL 
space Se; 
del le7; 
digit = #.33; 
puffer 
stelle : integer; 
ORDwert : integer; 
I : integer; 

I2 : integer; 
puffer2 : string [6]; 
negativ : boolean; 

ei „schar; 


nina 


typs 
var 
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: packed array [l..max] of digit; 


2. Nun erfolgt die eigentliche Eingabe. Zu- 
sätzlich zur normalen Korrekturmöglich- 
keit mit dem Linkspfeil sind zwei weitere 
Tasten belegt: 

— Die Delete-Taste macht „reinen Tisch”. 
Alle bisher auf dem Bildschirm ausgege- 
benen Zahlen werden gelöscht, bleiben 
aber im Puffer. Dies ersetzt das mehrmali- 
ge Drücken der Linkspfeil-Taste. 

— Die Rechtspfeil-Taste bewegt den Cur- 
sor um jeweils eine Stelle nach rechts, der 
entsprechende Wert wird übernommen. 
Beendet wird die Eingabe mit dem Drük- 
ken der Leertaste oder Return. Alle Zah- 
len, die links vom Cursor stehen, werden 
übernommen, es sei denn, der Cursor be- 
findet sich an derselben Stelle wie zu Be- 
ginn der Eingabe; in diesem Fall wird der 
Wert der Variablen nicht verändert. 

3, Der Puffer wird in eine Zahl verwandelt 
und ausgegeben, denn wenn z.B. im Puf- 
fer fünfmal eine 9 steht, heißt das noch 
lange nicht, daß die Zahl dann 99 999 ist. 
Maxint setzt hier Grenzen. 


begin 
{Teil 1} 


negativ := 


for I 


for I 
stelle:=1l; 


{Teil 2} 
repeat 


begin 
negativ 


end; 


begin 


write (chr {clearEüL), ' ', 
str (wert, puffer?2):; 
(puffer2 [1] = '-'); 


Damit die Readin-Prozedur jedem Pro- 
gramm zur Verfügung steht, sollte sie in 
eine Library-Unit eingebaut werden. Dazu 
muß man den Testteil aus dem Listing 
entfernen. 


Kurzhinweise 


1. Zweck: 

Prozedur zum komfortablen Einlesen von 
Integer-Werten. 

2. Konfiguration: 

Apple II+/e/c; Apple-Pascal 1.1 oder 1.2 
3. Test: 

E(xecute Readin 

4. Sammeldisk: 

READIN. TEXT 

5. Sonstiges: 

READIN. TEXT muß zunächst mit GETDOS 
(von Sammeldisk #15) auf Ihre Pascal- 
Arbeitsdiskette konvertiert und dann com- 
piliert werden. 


wert): 


if negativ then delete (puffer2, 1,1); 
stelle := length (puffer?2); 
for I2 := 1 to stelle do 
puffer [stelle] := ord (puffer2 [I2]} — ord og 7 
‚= stelle + 1 to max do ‘ 
if stelle < max then puffer [I] 
wert := abs (wert); 
:= 1] to stelle do 
write {chr (backspace)); 


= ß; 


read (keyboard, ch); 
ORDwert := ord (ch); 
if (stelle = 1) and (ORDwert = 45) then 


= true; 
write (ch) 


if (ORDwert = backspace) and (stelle > 1} then 


write (ch); 
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stelle := stelle - 1 
end; 
if (ORDwert = right) and (stelle <= max) then 
begin 
write (puffer [stelle]}; 
stelle := stelle + 1 
end; 
if ORDwert = del then 
begin 
for I := 1 to stelle - 1 do 
write {chr (backspace)); 
if negativ then write (chr (backspace)); 
write (chr (clearEOL)); 
negativ := false; 
stello := |] 
end; 
if (stelle <= max) and (ORDwert-ord ('8') in [B..9]) then 
begin 
write (ch); 
puffer [stelle] := ORbwert - ord ('9'); 
stelle := stelle + 1 
end 
until ORDwert in [space,return]; 


{Teil 3} 
if stelle > 1 then 
begin 
ORDwert := ]; 
wert := ß; 
for I:=stelle — 1 downto 1 do 
begin 
wert := wert + puffer [I] =» ORDwert; 
ORDwert := ORDwert = 19 
end 
end; 
if negativ then wert := — wert; 
for ORDwert := 1 to stelle - 1 do 
write (chr (backspace)); 
if negativ then write [chr (backspace)); 
write {chr (clearEOL), wert, ' ') 


writeln {chr (12), 'Readin-Testprogramn'); 

writeln ('von Norbert M. Doerner 1985'); 

x:=19; 

repeat 
write ('Geben Sie eine Zahl ein! (Ende mit 13)'); 
readin (x); 
writeln (x) 

until x=13; 

write (chr {12)) 

end. 





UCSD-Pascal-Bildschirm- 
Dump für Ehring-V80-Karte 


von Dr. U. Hesse 


Angeregt durch verschiedene SCREEN80-Programme (für 
Pascal auf Apple Ile/c in Peeker, 12/85, S. 48) habe ich ein 
entsprechendes Programm für den Apple II+ in Verbin- 
dung mit der V80-Karte der Firma Ehring entwickelt, das in 
UCSD-Pascal den Ausdruck des 80-Zeichenbildschirms 
auf dem Star-Drucker DP510 erlaubt. Das Programm dürfte 
jedoch auch mit jedem anderen Drucker funktionieren, da 
die Zeichen über den normalen WRITE-Befehl ausgegeben 
werden. 


Das Programm befindet sich unter dem Namen V80.TEXT 
auf der Peeker-Sammeldisk und muß zunächst mit 
GETDOS auf Ihre Pascal-Arbeitsdiskette konvertiert und 
dann compiliert werden. 
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V80.TEXT 


PROGRAM V8ß; 
VAR 
I,J : INTEGER; 


{ 

PROCEDURE HARDCOPY; 

TYPE 

TRIXARRAY = PACKED ARRAYI[ß..1] 

Or 0 ..259: 
VAR 
INH : ARRAY [1..2860] OF 9..255; 

TRIX : RECORD 
CASE BOOLEAN OF 
FALSE: (ADDRESS: INTEGER); 
TRUE : (POINTER: TTRIXARRAY) 

END; 


PROCEDURE POKE(ADDR, VALUE: INTEGER) ; 
BEGIN 

WITH TRIX DO 

BEGIN 

ADDRESS: =ADDR; 

POINTER? [8] :=VALUE 

END 
END; 


FUNCTION PEEK(ADDR: INTEGER) : INTEGER; 
BEGIN 
WITH TRIX DO 
BEGIN 
ADDRESS:=ADDR; 
PEEK:=POINTER?[®] 
END 
END; 


PROCEDURE RUECK; 
VAR 
D : TEXT; 
J : INTEGER: 
BEGIN 
REWRITE (D, 'PRINTER: '); 
FOR J := 1 TO 2068 DO 
BEGIN 
WRITE(D,CHR{INH[J])): 
IF J MOD 88 = Ö THEN WRITELN{D) 
END; 
CLOSE(D) 
END; 


PROCEDURE LIES; 


VAR 
I,SEITE, ADRESSE,ADR,X,Y : INTEGER; 
BEGIN 
= 1% 
FüR Y =] 1025 D0 
FOR X := Bd TO 79 DO 
BEGIN 
ADR := (XrY&8ß+(PEEK{1787)-15)*16) 
MOD 2948; 


SEITE := ADR DIV 512; 
POKE(-15615, 8); 
ADRESSE := (-162B88+SEITE#4); 
POKE (ADRESSE,ß); 
INH[I]:= PEEK{ADR MOD 512-13312); 
I: IT+l 
END; 
END; 


BEGIN {HARDCOPY} 
LIES; 


Tamm ni EEE a TEE a nr 


FOR J := 1 TO 24 DO 
BEGIN 
WRITE(J:2); 
FOR I := 35 TO 112 DO WRITE(CHR(I)) 
END; 
HARDCOPY 
END. 
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ProDOS-RAM-Disk-Driver 





für die OHO-512K-RAM-Karte 


von Stefan Hußfeldt 


Für die OHO-512K-RAM-Karte existieren 
Init- und Treiber-Programme für die Be- 
triebssysteme DOS, UCSD Pascal und 
CP/M. Da ich die Karte aber auch als 
RAM-Disk unter ProDOS benutzen wollte, 
schrieb ich das Programm OHO.RAM- 
DISK. Es handelt sich dabei um eine Kom- 
bination aus Init- und Treiber-Programm, 
d.h. daß dieses Programm die RAM-Disk 
sowohl jnitialisiert als auch an ProDOS 
anschließt. Das Ankoppeln an ProDOS 
wird nur durch das Eintragen diverser Pa- 
rameter in die ProDOS-Global-Page voll- 
zogen. Damit dürfte die RAM-Disk unter 
allen ProDOS-Versionen lauffähig sein. 
Erfolgreich getestet habe ich das Pro- 
gramm auf einem Apple II+ mit 64K RAM 
unter den ProDOS Versionen 1.0.1, 1.0.2 
und 1.1.1. 


1. Die RAM-Karte 


Die maximale Speicherkapazität der OHO- 
Karte beträgt 512K RAM; geliefert wird die 
Karte jedoch nur mit 256K. Das Aufrüsten 
auf die maximale Kapazität beschränkt 
sich jedoch auf den Kauf von acht Spei- 
cher-ICs vom Typ 41256, die dann in die 
freien Sockel auf der Karte gesteckt wer- 
den. Bei meiner Version der RAM-Karte 
muß jetzt nur noch ein Jumper umgesteckt 
werden, damit die vollen 512K RAM 
adressiert werden können. 

Neben diesem eigentlichen RAM verfügt 
die Karte auch noch über 256 Bytes RAM 
im Bereich $Cs00-$CsFF (s = Slot). Dort 
wird normalerweise das jeweilige RAM- 
Disk-Treiber-Programm untergebracht. 
Um nun Daten von und zur RAM-Karie zu 
transportieren, besitzt diese ein 19-Bit- 
Adreß- und ein 8-Bit-Datenregister. Die 
Registeradressen lauten wie folgt: 

$C0x0 = Low-Byte-Adreßreg. 

$C0x1 = Middle-Byte-Adreßreg. 

$C0x2 = High-Byte-Adreßreg. und 
$C0x3 = Datenregister, 

wobei x=s+$8 (s = Slot). 
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Im folgenden gehen wir davon aus, daß 
sich die Karte in Slot 5 befindet. Es gelten 
dann die Adressen $CODO-$COD23. 


Durch das 19-Bit-Adreßregister lassen 
sich genau 2 hoch 19 = 524288 = 512K 
Adressen ($000000-$07FFFF) anspre- 
chen. Die 19 Bits sind auf zwei 8-Bit- 
Register (Low- und Middle-Byte) und ein 
3-Bit-Register (High-Byte) verteilt. 

Wollen wir nun zum Beispiel in die Adres- 
se $01?2345 (HHMMLL) das Daten-Byte 
$FF poken, müssen wir erst einmal das 
High-Byte der Adresse ($01) nach $COD2, 
das Middle-Byte ($23) nach $CODI und 
das Low-Byte ($45) nach $CODO poken. 
Jetzt muß nur noch das Daten-Byte in 
Adresse $COD3 (Datenregister) geschrie- 
ben werden. Somit steht in Adresse 
6012345 der RAM-Karte das Byte $FF. 
Wenn wir im umgekehrten Fall ein Daten- 
Byte von der Karte lesen wollen, müssen 
wir zuerst wieder die Adresse in das 19- 
Bit-Adreßregister poken und können dann 
den Wert aus dem Datenregister ($C0D3) 
lesen. Man vergleiche hierzu das analoge 
Verfahren bei der 1-Megabyte-AP33- 
RAM-Karte, die ein 20-Bit-Adreßregister 
verwendet (s. Schaubild in Peeker, Heft 7/ 
35,9.10), 


2. Das Programm 
2.1. RAM-Disk-Init 


Gestartet wird das Programm mit BRUN 
OHO.RAMDISK. Zuerst wird festgestellt, 
ob die RAM-Karte schon initialisiert ist. 
Dies geschieht, indem die ersten drei 
Bytes des Treiber-Programmes, welches 
ab $C500 im Speicher liegt (RAM-Karte in 
Slot 5), auf die Bytefolge „4C72C5“ hin 
überprüft werden. Ist das Ergebnis positiv 
(= RAM-Karte initialisiert), überzeugt sich 
das Programm, ob ProDOS von der Exi- 
stenz der RAM-Disk „weiß“, d.h. ob die 
RAM-Disk in der ProDOS-Global-Page 


eingetragen ist. Ist dies nicht der Fall, wird 
die RAM-Karte als RAM-Disk in Slot 5, 
Drive 1, Volume: /RAM/ (1024 Blöcke) 
angeschlossen und das Programm ver- 
lassen. 


Ist das Ergebnis der Überprüfung negativ, 
übernimmt das Programm das Initialisieren 
der Karte. Dazu wird zuerst einmal der 
RAM-Bereich der Karte für die Blöcke 0-6 
der RAM-Disk gelöscht (Adreßbereich: 
$00000-$00DFF). Von der Maßnahme, die 
ganze Karte zu löschen, habe ich abgese- 
hen, da dies nicht notwendig ist. (Sie ha- 
ben es sicher gemerkt: Auf der Karte sind 
auch die Blöcke O0 und 1 existent. Sie 
enthalten bei physischen Disketten den 
Urlader. Auf der RAM-Disk stehen sie zur 
freien Verfügung und können über das 
MLI bearbeitet werden.) 


Als nächstes wird der Volume-Directory- 
Kopf angelegt (Block 2), dann die Blöcke 
3.5 als Non-Key-Blocks des Volume-Di- 
rectory initialisiert, die Volume-Bit-Map 
(Block 6) erstellt und zum Schluß der 
RAM-Disk-Driver nach Adresse $C500 
kopiert und die RAM-Disk an ProDOS an- 
geschlossen. Dazu müssen folgende Pa- 
rameter in die ProDOS-Global-Page ein- 
getragen werden: Disk-Driver-Vektor (= 
Beginn des Treiberprogrammes), Device- 
Anzahl (Anzahl der „Geräte“ um eins er- 
höhen) und Device-Bit-Muster (Geräte- 
Erkennungs-Bits). Wer näheres darüber 
und über das „Aussehen“ der Blöcke 2-6 
wissen möchte, der lese dies in „Apple 
ProDOS für Aufsteiger, Band 1” nach. 
Nach einem Neubooten kann die RAM- 
Disk am einfachsten mit BRUN OHO. 
RAMDISK wieder an ProDOS angeschlos- 
sen werden. Die Daten auf der RAM-Disk 
bleiben dabei natürlich erhalten. Zwei wei- 
tere Möglichkeiten, die Karte wieder anzu- 
schließen, sind: 

1. Nach CALL -151 im Monitor $C500G 
eingeben, 

2. Unter dem BASIC.SYSTEM CALL 
49152+256x5 eintippen. 
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2.2. RAM-Disk-Treiber 


Die eigentliche Aufgabe eines RAM-Disk- 
Treibers ist es, Daten von und zur RAM- 
Karte zu transferieren. Damit das Pro- 
gramm die richtigen Daten überträgt, sind 
ihm einige Werte zu übergeben. Vor ei- 
nem Sprung zum RAM-Disk-Treiber hat 
das MLI (Machine Language Interface) in 
der Zeropage folgende Werte abgelegt: 
$0042: Befehl (0=Seek, 1=Read, 
2=Write, 3=Format) 

$0043: Unit-Nummer ($50 für Slot 5, Drive 
1) 

$0044: Low- und High-Byte des 512- 
Byte-l/O-Puffer 

$0046: Low- und High-Byte der Block- 
nummer. 


Als Befehle sind bei einer RAM-Disk nur 
Read und Write zulässig. Bei Aufruf von 
Seek wird der Treiber mit CLC und Accu = 
$00 (kein Fehler) und bei Format mit SEC 
und Accu = $27 (l/O-Fehler) verlassen. 
Ein Vergleich der vom MLI übergebenen 
Unit-Nummer mit der eigenen Unit-Num- 
mer ist hier nicht notwendig. 

Die Adresse des l/O-Puffers wird schon 
vom MLI auf ihre Richtigkeit hin überprüft, 
kann also vom Treiber ohne Test über- 
nommen werden. 

Auch wird der Wert für die Blocknummer 
vor Aufruf des Treibers vom MLI berech- 
net und ist somit als richtig anzusehen. 
Bei einem Zugriff auf die RAM-Disk mit 
Read oder Write wird nun als nächstes aus 
der Blocknummer der entsprechende 
RAM-Bereich auf der Karte berechnet. 
Dies geschieht folgendermaßen: 


Blocknummer Adreßbereich 
17171010) -> $oBHBBB-SÖBÖLFF 
$andi -> $000229-$BBBSFF 
30992 > $oHBAaBB-SONDSFF 
: > : : 
$öSFF > $O7FEBB-SOTFFFF 


Jetzt wird bei einem Read der entspre- 
chende Adreßbereich der RAM-Karte in 
den I/O-Puffer übertragen. Bei Write ko- 
piert der Treiber den I/O-Puffer in den 
berechneten Adreßbereich der RAM-Kar- 
te, In beiden Fällen wird der Treiber mit 
CLC und Accu = $00 (kein Fehler) ver- 
lassen, 

Die Übertragungsrate beträgt 51.2K/s bei 
Read und 53.7K/s bei Write. 


3, Hinweise und Änderungen 


OHO.RAMDISK Ss. ur elotspow>128 
OHO.,RAMDISK.,ACC -> für LC; Sl2K 
OHO.RAMDISK ,256 -> für Slot 5, 256K 
OHO.RD.ACC.256 -> für LC; 256K 
RENAME.VOL.RD -> zum Umbenennen 


Das vorliegende Programm OHO.RAM- 
DISK geht davon aus, daß sich die OHO- 
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RAM-Karte in Slot 5 befindet. Soll die Kar- 
te in einem anderen Slot arbeiten, müssen 
folgende Zeilen im Quellcode T.OHO.RAM- 
DISK geändert werden: 16 SLOT, 17 
SLOTCSs, 28 SLDR (s. Zeile 19-26), 266 
Device-Bit-Muster (s. Zeile 257-264). Für 
eine RAM-Disk in Slot 4, Drive 2 lauten die 
Zeilen folgendermaßen: 16 SLOT EQU 
$40, 17 SLOTCS EQU $C400, 28 SLDR 
EQU $BF28, 266 LDA #% 11001111. 


Wer der RAM-Disk einen anderen Vol- 
ume-Namen geben möchte, kann dies mit 
Hilfe des BASIC-Programms RENAME. 
VOL.RD tun, 


Ist de RAM-Karte nur mit 256K RAM be- 
stückt, müssen im Quelltext zwei Zeilen 


geändert werden: Zeile 67 in HEX 
0D000006000002 und Zeile 131 in LDY 
#$3F. (Hex-Dump: $203A:02 und 


2096:3F) Auf der RAM-Disk stehen jetzt 
505 Blöcke zur freien Verfügung. Die 
256K-Varianten befinden sich auf der 
Sammeldisk als Objektcodes (OHO.RAM- 
DISK.256 und OHO.RD.ACC.256). 


Das Programm gibt es in zwei Versionen: 
Die Version OHO.RAMDISK läuft sowohl 
auf dem Apple Il+ (64K) als auch auf dem 
Apple Ile mit und ohne 64K-RAM-Karie. 
Für den Betrieb auf dem Apple Ile mit 
128K RAM muß lediglich der Volume-Na- 
me der OHO-RAM-Disk geändert werden; 
da die 64K-RAM-Karte, falls diese als 
RAM-Disk arbeitet, schon den Namen „/ 
RAM“ hat (s.o.). 

Die Version OHO.RAMDISK.ACC legt das 
Treiber-Programm nicht bei $C503, son- 
dern bei Adresse $FFOO ab. Diese Version 
läuft ebenfalls auf beiden Rechnertypen, 
jedoch ist folgendes zu beachten: Beim 
Apple Ile mit 128K RAM liegt ab $FFOO der 
RAM-Disk-Treiber für die 64K-Karte. Wer 
aber auf die Benutzung der 64K-Karte als 
RAM-Disk verzichten kann, sollte diese 
Version benutzen. Der Vorteil: Besitzer ei- 
ner Accelerator-Karte werden eine Ge- 
schwindigkeitssteigerung bei der Daten- 
übertragung von und zur OHO.RAM-Disk 
feststellen. Dies liegt daran, daß jetzt nur 
noch wenige Adressen im Bereich von 
$C000-$CFFF liegen; denn wird eine die- 
ser Adressen angesprochen, taktet die 
Accelerator-Karte von 3,5 auf 1 MHz her- 
unter. 


Noch ein Tip für diejenigen, welche die 
RAM-Karte unter KYAN PASCAL benut- 
zen möchten. Damit die OHO-RAM-Disk 
(/RAM) nach dem Start des KIX.SYSTEMs 
automatisch mit den Files des Subdirecto- 
ries BIN der KYAN-Arbeitsdiskette gela- 
den wird, muß Bit 4 der Adresse MACHID 
($BF98) in der ProDOS-Global-Page auf 1 
gesetzt werden. 


Kurzhinweise 


1. Zweck: 
ProDOS-RAM-Disk-Treiber für 
RAM-Karten 

2. Konfiguration: 

Apple II+/e mit OHO-Karte (512K oder 
256K) in Slot 5; ProDOS 

3. Test: 

BRUN OHO.RAMDISK 

4, Sammeldisk: 

T.OHO.RAMDISK (Quelltext) 
OHO.RAMDISK (512K, Siot 5) 
T.OHO.RAMDISK.ACC (Quelltext) 
OHO.RAMDISK.ACC (512K, Slot 5, LC- 
Version) 

OHO.RAMDISK.256 (256K, Slot 5) 
OHO.RD.ACC.256 (256K, Slot 5, LC-Ver- 
sion) 

RENAME.VOL.RD 

5. Sonstiges: 

Die Dateien müssen zunächst mit GET- 
DOS oder GONVERT von der Sammeldisk 
auf Ihre ProDOS-Arbeitsdiskette konver- 
tiert werden. 


OHO- 


RENAME.VOL.RD 


D$ = CHR$ (4) 

PRINT D$;"BLOAD OHO.RAMDISK" 

EOG Ir = 170, I Vorne 

VOLL$ + CHR$ (9®): NEXT 

FOR I = 1 TO 15:NAME$ = 

NAMES + CHR$ ( PEEK (I + 8212) + 128): 

NEXT 

HOME 

PRINT CHR$ (12); 

PRINT "JETZIGER VOLUME-NAME: ":;NAME$ 

INPUT "NEUER VOLUME-NAME: "';NEU$: 

LANG = LEN (NEU$) 

IF LEN (NEU$) > 15 THEN PRINT : 

PRINT "NAME ZU LANG !";: GOSUB 79: 

GOTO 25 

NEU$ = NEU$ + MID$ (VOLL$, LEN (NEU$} 

+ 1,15 - LEN (NEU$)) 

EOR I - 1 17075 

TEST$ = MID$ (NEU$,I,1) 

TE T =ISAND (TESIS > = U] AND 

TEST$ < = "9") THEN PRINT : PRINT 

"NAME MUSS MIT EINEM VERSAL BEGINNEN!";: 

GOSUB 79: GOTO 25 

IF (TEST$ < "." AND TEST$ <> CHR$ (ß)) 

OR TEST$ = "/" OR TEST$ > "zZ" OR 

(TEST$ > "9! AND TEST$ < "A") THEN 

PRINT: PRINT "DAS ZEICHEN '";TEST$; 

' 1ST NICHT ERLAUBT !";: GOSUB 79: 

GOTO 25 

NEXT 

FOR Lt - I 10 15 

POKE I + 8212, ASC ( MID$ (NEU$,I,1}} 

NEXT 

POKE 8212,248 + LANG 

PRINT D$; "UNLOCK OHO.RAMDISK" 

PRINT D$; "BSAVE OHO,RAMDISK, 

A$200B,L$1AF" 

PRINT D$; "LOCK OHO.RAMDISK'" 

END 

PRINT 

PRINT CHR$ (7); 

"BITTE EINE TASTE DRÜCKEN —> ";: 

GET KEY$ 
85 PRINT : 
88 RETURN 


PRINT 
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E 
19 % 
2b * 
21 * 
22% 
23 %* 
24 %* 
25 %* 
26 %* SLDR EQU 
AT x 
28 SLDR EQU 





129 * 
5® DEVYNUM EQU 
| 31 DEVICE EQU 
Sr 














* 
35 LBYTE EQU 
36 MBYTE EQU 
37 HBYTE EQU 
38 DBYTE EQU 
















ErkkKkKkrN 


47 LDX 






48 LOOP LDA 
| 49 CMP 
50 BNE 
51 DEX 





BPL 





JMP 








* 


69 HEX 


62 HEX 
65 HEX 










65 HEX 
66 HEX 
67 HEX 
68 * 






70 x 

71 INIT LDY 
TR TYA 
1 TAX 
74 sTA 
STA 















* 
77 x Blöcke B-6 
78 * 

79  LOOP® STY 
'e17) SsTA 
8l INY 
82 BNE 
83 INX 
84 STX 
85 CrX 
86 BNE 











T.OHO.RAMDISK 
(Big-Mac-Quelltext) 









l “ 

2 - OHO.RAMDISK 
5 7 ————— 
& * 

5) * 

6 & 

. x als RAN-Disk: 

8 * 

9  * Volume: /RAM/ 

1d x Slot 5, Drive 1 

11 * 1817 freie Blöcke 
IE: 

14 ORG $2009 
15 + 

16 SLOT EQU 958 

17 SEOTCS EQU $c589 


Disk-Driver-Vektor 


GBF28 
$BF1A 


$BF31 
$BF32 


x Adressen der RAM-Karte 





Das Programm initialisiert unter 
Prob0OS die OHO-S12K-RAM-Karte 


;$sd 


:$Csdß, s=Slot 


$BFlÖ+2xs für Drive 1 
$BF20+2x&s für Drive 2 (s=Slot) 


z.B.: S4,D2: -> $BF2ß+2x4=$BF28 


:54,D2 


;55,Dl 


$CÖBÖ+SLOT 
$CB81+SLOT 
$C982+SLOT 
$CH83+SLOT 


+92 


RAM-Disk-Init 


RAN-Disk schon initialisiert? 


INITEND+1,X 
DRIVER,X 


INIT 


LOOP 


x 43 Bytes Volume-Directory-Kopf 


HEX BBBBASAD 


Fö :$Fx 
;x=Länge 

52414DRBBBHBGBDD ;RAM.... 

DEDRDODDDDDDDD innen 


Bunnnnunnnneenn 


CONNECT? 


;Nein —> Init 









BonDDDHDBBLWRC52T 
BDBnnndennend 


#00 

HBYTE 
MBYTE 
werden 


LBYTE 
DBYTE 


LOOPB 
MBYTE 


#$0E 
LOOPB 






87 * 








* Volume-Diresctory-Kopf (Block 2) 


69 & RAM-Disk wird initialisiert 


gelöscht 


‚alle Blöcke? 




















x anlegen. 
BB * 

sı LDA 
2 STA 
LDY 












STE 
96 LDA 
97 STA 
93 DEY 
BPL 






















E 
101 & Blöcke 3-5 


183 + 

194 LDX 
185 LOOP2 TXA 
186 TAY 
187 ASL 
1d8 STA 
189 LDA 
11 STA 
111 DEX 
112 STX 
















113 LDA 
114 STA 
115 INY 
116 STY 
117 INX 
118 INX 
1219 CPX 
128 BNE 
121 LDA 
122 STA 


a 
[a 
ai 
LE Ze Zu Ze 


128 LDA 
129 STA 
138 LDA 
[31 LDY 


STY 


154 STA 
135 DEY 
136 BNE 
137 STY 
138 INY 


STY 
















# 


1435 &* 

144 LDX 
145 LOOP4 LDA 
146 STA 
147 DEX 
148 CPX 


BNE 





* 
JSR 
* 
INITEND 
* 






RTS 














158 

159 ORG 
169 * 

161 COMMAND EQU 
162 PAGES EQU 
163 PUFFERL EQU 
, 164 PUFFERH EQU 
| 165 BLOCKL EQU 
1656 BLOCKH EQU 
E 3 
Se 
169 DRIVER JMP 








179 x 

171 DRENTRY LDA 
172 ASL 
TS STA 


176 ROL 





+04 
MBYTE 
+42 


LBYTE 
VDK,Y 
DBYTE 


LOOP1 


{Volume-Directory 
182 * Non-Key-Blocks) formattieren. 


+03 


MBYTE 
#90 
LBYTE 


DBYTE 
+02 
LBYTE 


DBYTE 


+96 
LOOP2 
300 
DBYTE 


Volume-Bit-Map (Block 6) anlegen 
belegte Blöcke: #-6 
freie Blöcke: 7-1923 


#50C 
MBYTE 
+$FF 
#67 F 


LBYTE 
DBYTE 


LOOP3 
LBYTE 


DBYTE 


141 * RAM-Disk-Driver wird nach Adresse 
ı 142 * $Csßß kopiert. 


#DRIVEND-DRIVER 
INITEND+1,X 


DRIVER, X 


+$ FF 
LOOP4 


CONNECT? 


= RAM-Disk-Driver 
157 x* ee 
* 


SLOTCS 
$42 

543 

544 

$45 

$46 

$47 
CONNECT? 
BLOCKL 
MBYTE 
BLOCKH 
HBYTE 


COMMAND 


(s=Slot) 





‚Rückw.-Zeiger 


‚Vorwä.-Zeiger 


‚letzt. Vorwä.- 
; Zeiger=dß 







‚wird gerettet 














:*2 ,BLOCKL>$7F 
> CG=l 





k2H+l 













189 BEQ NOERROR :B0=Seek 

181 CMP_ #83 

182 BEQ IOERROR  ;#3=Format 
183 LSR :Read -> C=l 
184 LDA PAGES 

185 PHA 

186 LDA #92 

187 STA PAGES 

188 LDY #68 


BCS READL 























































* 
191 + Schreibvorgang 


192 x 

1935 LDA PUFFERL 

194 STA WRPAGE+HL 

195 LDA PUFFERH 
| 196 STA WRPAGE+Z 


197 WRITE STY LBYTE 
198 WRPAGE LDA $FFFF,Y ‚wird gepokt 


199 STA DBYTE 
208 INY 

201 BNE WRITE 
282 ING WRPAGE+H2 
203 INX 

| 204 STXA MBYTE 

| 285 DEC PAGES ;‚2.Page 
206 BNE WRITE 
267 BEQ RESTORE 
208 * 
289 & Lesevorgang 
210 x 
211 READI LDA PUFFERL 
212 STA RDPAGE+L 
213 LDA PUFFERH 

| 214 STA RDPAGE+HZ 
215 READ SPY » LEITER 
218 LDA DBYTE 


217 RDPAGE STA $FFFF,Y ‚wird gepokt 
218 INY 


219 BNE READ 
228 INC RDPAGE+2 
Ii221 INX 
222 STX MBYTE 
223 DEC PAGES ;2. Page 


BNE READ 





# 
226 RESTORE PLA 
STA 









* 
229 NOERROR TYA :A=Y=ß=0kay 

230 CLE ‚kein Fehler 
RTS 





* 
233 IOERROR LDA #827 :1/0-Error 
2354 SEC ‚Fehler 

RTS 





* 
237 * RAM-Disk angeschlossen? 










| 238 * 
239 CONNECT? LDA SLDR 
240 CMP_ #<DRENTRY 
24l BNE CONNECT 
242 LDA SLDR+1 
243 CMP #>DRENTRY 
244 BENE CONNECT 


RTS 
* 
247 *& RAM-Disk anschließen 












248 %* 

249 CONNECT LDA #<DRENTRY ;Disk-Driver- 
258 STA SLDR ;Vektor in 
251 LDA #>DRENTRY ;ProbDOS-G-P 
aan STA SLDR+1 ‚eintragen 








254 INC DEVNUM :umn ein Drive 
255 LDX DEVNUM ‚erhöhen 








1l11l RAM-Karte 


256 * 
257 * Device-Bit-Muster 
258 # 
259 * Bit 76543218 
260 * 1) Drive 1 
261 * l Drive 2 
2ER * 118 Slot & 
263 * 181 Slot 5 
E 3 
* 


266 LDA #26d1811111 ;S5,Dl 
267 STA DEVICE,X 
268 * 


DRIVEND RTS 
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OHO.RAMDISK.ACC 
(Hex-Dump) 


OHO.RAMDISK 
(Hex-Dump) 


Apple Software für 
Vertreter und Reisende 


Terminverwaltung, Berichts- 
programm, Textbearbeitung 


von K. W. Hillerkus 


1986, Diskette mit Manual, 
DM 278, — 
ISBN 3-7785-1322-2 


Die auf dieser Diskette enthaltenen 

Programme sind auf ein Vertreter-/ 

Reisenden-Büro zugeschnitten und 

sollen die immer wiederkehrenden 

Arbeiten erleichtern oder ganz über- 

nehmen, wie z. B.: 

e Berichte schreiben mit automatı- 
scher Terminverwaltung. 

e Termine/Daten/Namen USW 
auch kombiniert suchen und aus- 
listen. 

Anschriften verwalten und auto- 
matisch einem Bericht zufügen. 
Tagestermine verwalten und auf 
Datum oder Tagesname ausge- 
ben, 

Kundentermine suchen, korrigie- 
ren, kopieren, ändern, ausgeben. 
Während der Berichtserstattung 
neue Kunden aufnehmen. 

Auf die Berichte einen verschlüs- 
selten Termin eintragen. 

Zählen, wieviel Berichte ein ver- 
tretenes Werk erhalten hat. 

Briefe schreiben, mit und ohne 
Anschrift abspeichern, korrigie- 
ren, Zeilen zufügen oder strei- 

— chen, Adresse ändern, Text am 

Bildschirm auslisten. 


BSAVE OHO.RAMDISK.ACC, A$2B0ß ,, L356 BSAVE OHO.RAMDISK ,, A$2809 ,L335 
32898: 
$2088: 
S2018: 
$2PB18: 
2028: 
62928: 
$2938: 
52038: 
2048: 
$2048: 
$28589: 
92058: 
$286%: 
92868: 
27h: 
$2978: 
208%: 
$2988: 
$2898: 
$2898: 
$2BAß: 
S2BA8: 
$2BBB: 
$2DB8: 
$28C09: 
S2BC8: 
$29D89: 
$208D8: 
S2BEB: 
SROEB: 
$2BFB: 
S20F8: 
82199: 
52188: 
82110: 
82118: 
S212B: 
62128: 
62130: 
$2138: 
$214B: 
$2148: 
$2158: 
$2158: EB Bo Bo 


92B8B: 
52088: 
S2B1B: 
S2B18: 
$2028: 
32828: 
$2038: 
92938: 
$2084B: 
652948: 
$2059: 
$2958: 
$206B: 
$2868: 
52878: 
52978: 
$2B8B: 
$2BBB: 
$2898: 
S2B98: 
S2BAB: 
S2BA8: 
$20BB: 
$20B8: 
S28C9: 
H29C8: 
$2BDB: 
$20D8: 
$20EP: 
$20E8: 
S2BFB: 
$20F8: 
$2199: 
$2198: 
$211B: 
$2118: 
$212$: 
$2128: 
$2130: 
62138: 
$2148: 
$2148: 





Sammeldisk #26 Rundschreiben erstellen mit An- 
B14 T.BRK schriftenverwaltung, Anschriften 

es A == HEFT 2/87 — 002 BRK werden am Bildschirm gezeigt 
nen en und können angenommen oder 
002 TEXT.LI8PB 002 G- abgelehnt werden, Auflisten, an 
ine 005 STIEHL welche Anschriften der Text ging. 
005 HGR1.TEST 030 DB-MEISTER.OBJ h Date u, / 
062 LOSPD.HCR1 ee dressen-Dateien ausdrucken mit 
oe ae 036 DB-PFLEGER ‚OBJ Speicherbezeichnung. Adressen- 
002 LOBBASHERZ 2 Pan datei einrichten, ergänzen, korri- 
B1B T.LOSBN.HGR3 077 ASM.SYSTEM gieren, am Bildschirm auslisten, 


#93 HGR3Q.TEST 
d02 LQ808_HGR3Q 
d1ß T.LQSPA.HGR3Q 
aB2 B- 

All READIN, TEXT 
02 C- 

ans V8B.TEXT 

02 D- 

#83 DEMO.TEXT 
P28 LONGINT.TEXT 
802 E- 

035 FX88.PATCHER 
86 T.FX80.INIT 
AB2 FX89.INIT 
Bß2 F- 


une eu Etiketten drucken für die ange- 
ae ee schriebenen Anschriften oder an 


033 T.MATCH ausgesuchte Adressen aus der 


a Hauptdatei. 


Bi6 T.OHO.RAMDISK Gerätevoraussetzung: Apple II mit 
A a ee A CP/M-Karte oder Basis 108; 
rs Pendkat MBASIC unter CP/M 2.2. 


#83 OHO.RAMDISK.ACC 
#83 OHO.RAMDISK.256 a 
893 OHO.RD.ACC.256 Dr. Alfred Hüthig Verlag 
Te Postfach 10 28 69 

72 INHALT,DISKETTEN 6900 Heidelberg 


O4 pP > dd dr di > HH VD IV HdH Ur, Hd Ur ie m 
Hb > tool qgtu dr U 4 pP > tu m> Duuu>>umu4W-J 





Einzelpreis DM 28,-, Fortsetzungspreis DM 20,- 
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MICOL-BASIC 





Eine strukturierte Compiler-Sprache 


Micol Basic 


1. Gegenstand 


Die kanadische Firma MICOL SYSTEMS hat 
einen Compiler für Applesoft-Basic auf den 
Markt gebracht, der gleichzeitig eine Weiterent- 
wicklung von Applesoft zur strukturierten Pro- 
grammiersprache ist. Er compiliert bestehende 
Applesoft-Programme unter ProDOS (nicht 
DOS 3.3); diese laufen dann im Durchschnitt 8- 
bis 20mal schneller als zuvor. Außerdem lassen 
sich mit dem MICOL-Editor strukturierte Pro- 
gramme schreiben, die zwar auf Applesoft auf- 
bauen, jedoch eher an Pascal oder LOGO erin- 
nern. MICOL-BASIC ist auf dem Apple II+, dem 
IIc, dem Ile und dem erweiterten Ile lauffähig 
und beim kanadischen Hersteller zum Einfüh- 
rungspreis von $49.95 (plus $10.00 Porto und 
Verpackung) erhältlich (jetzt $89.95). 


2. Leistungsfähigkeit 


MICOL-BASIC wurde hauptsächlich für Schu- 
len entwickelt. Kinder mögen Basic aus ver- 
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schiedenen Gründen ganz besonders, Pädago- 
gen hingegen überhaupt nicht. Ihr Hauptvor- 
wurf: Basic verführt zu einem chaotischen Pro- 
grammierstil. 

Der Applesoft-Compiler von MICOL bringt die 
beiden Standpunkte zur Deckung. Er baut auf 
dem auf, was Kinder mögen und in der Regel 
schon können, nämlich Basic, und fügt hinzu, 
was Pädagogen an Basic vermissen, nämlich 
eine Struktur. Natürlich können auch erwachse- 
ne Basic-Programmierer hiervon profitieren. 
Ein einfaches Beispiel soll illustrieren, wie das 
MICOL-System aus Applesoft eine strukturierte 
Sprache macht: 


Unstrukturiertes Programm in Applesoft: 


18 LETX=9 
2B LETY= 19 
See ya] 


aß PRINT X,Y 
50 IF Y > Ö THEN GOTO 3® 
68 STOP 


Dasselbe Programm in strukturiertem MICOL- 
BASIC: 


18 LET zähle_bis_zehn = 

28 LET zähle_bis_null = 1ß 

38 REFEAT 

4d zähle_bis_zehn =, zähle_bis_zehn +1 
59 zähle_bis_null = zähle_bis_null -|1 
6 PRINT zähle_bis_zehn , zähle_bis_null 


78 UNTIL zähle_bis_null = 9 
8A STOP 


Das Beispiel zeigt, daß in MICOL-BASIC Varia- 
blen beliebige Längen haben und mit denselben 
zwei Buchstaben beginnen dürfen, daß es zu- 
sätzliche Befehle für strukturiertes Programmie- 
ren gibt (hier REPEAT.. UNTIL) und daß Pro- 
gramme durch Einzüge der Zeilen übersichtli- 
cher gestaltet werden. 


Außerdem fenhit in der MICOL-Version der Be- 
fehl GOTO. GOTO gilt bei den MICOL-Entwick- 


lern als größte „Sünde“ von Basic und ist daher 
in MICOL-BASIC zwar implementiert, es gibt 
aber die Compiler-Option NOGOTO: Schaltet 
man sie ein (z.B. als Lehrer in der Schule), dann 
akzeptiert der Compiler keine GOTOs. 


MICOL-BASIC erlaubt modulares Programmie- 
ren wie beispielsweise Pascal oder LOGO. Zu 
diesem Zweck wurde Applesoft um den Befehl 
GOSUB ROUTINE erweitert. 

Folgendes Beispiel soll dies erläutern: 


108 GOSUB modul_eins 
11® GOSUB modul_zwei 
128 GOSUB modul_eins 


13 END 

288 ROUTINE modul..eins 

219 PRINT "Wir sind im ersten Modul" 
ARD RETURN 

230 ROUTINE modul_zwei 

2A PRINT "Wir sind im zweiten Modul" 
250 RETURN 


GOSUB verlangt also nicht unbedingt eine Zei- 
lennummer, es akzeptiert auch den benutzer- 
definierten Namen einer ROUTINE, was das 
Programmieren besonders angenehm und 
übersichtlich macht. 

Ein typisches MICOL-Programm sieht demnach 
ähnlich aus wie ein Pascal-Programm: Es be- 
steht aus einem Hauptteil (im Beispiel Zeilen 
100-130) und einer Reihe von Routinen, die aus 
dem Hauptprogramm aufgerufen werden. Dabei 
können Routinen auch aus anderen Routinen 
heraus aufgerufen werden. 

Weitere MICOL-Befehle, die strukturiertes Pro- 
grammieren erleichtern, sind die folgenden: 
IFSIHENGEESEIFSDIENFBEGINZELSE NBE- 
GIN..ENDIF, FOR..TO..UNTIL..NEXT (bricht ei- 
ne FOR-NEXT-Schleife vorzeitig ab, wenn die 
Kondition nach UNTIL wahr wird, eine Annehm- 
lichkeit, die es nicht einmal in Pascal gibt), PER- 
FORM..UNTIL (führt eine Routine aus, bis die 
Kondition nach UNTIL wahr wird), REPEAT. 
‚UNTIL und WHILE..WEND, 
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In MICOL-BASIC gibt es boolesche Variablen, 
die mit „!" enden und als TRUE oder FALSE 
definiert werden. Außerdem können — ähnlich 
wie in Pascal — Variablen am Anfang des Pro- 
gramms als Integer, Real, String oder Boolean 
definiert werden, was die Programme übersicht- 
licher macht. 

Leider gibt es auch einen (wenn auch einzigen) 
schwerwiegenden Mangel: An die Einführung 
lokaler Variablen in Routinen wurde nicht ge- 
dacht, was in großen Programmen natürlich zu 
Seiteneffekten führen kann und didaktisch 
schlecht ist. 


3. Handhabung 


Der MICOL-Compiler ist weitgehend kompati- 
bel mit Applesoft und ProDOS, d.h. alle beste- 
henden Applesoft- (nicht aber Integer-Basic-) 
Programme können compiliert werden. 

Tut man dies erstmals, erlebt man eine Überra- 
schung: Die Programme rasen in einer Ge- 
schwindigkeit los, die man nicht für möglich 
gehalten hätte. MICOL-compilierte Programme 
laufen (im Gegensatz zu Applesoft}) umso 
schneller, je weniger Real-Variablen sie benut- 
zen. Schreibt man bestehende Applesoft-Pro- 
gramme entsprechend um, wird die Geschwin- 
digkeit so hoch, daß man sie gelegentlich - z.B. 
in Spielen — mit „SPEED=" wieder „abbrem- 
sen" muB. 

Applesoft muß zum Compilieren zuerst in einen 
ASCII-Text umgewandelt (ein entsprechendes 
Umwandlungsprogramm wird mitgeliefert) und 
teilweise leicht abgeändert werden: Beispiels- 
weise muß das Argument von HTAB und VTAB 
in Klammern gesetzt werden, und der Ausdruck 
„HPLOT x,y TO a,b” wird nicht akzeptiert, er 
muß durch „HPLOT x,y:HPLOT TO a,b“ ersetzt 
werden. Außerdem führen Ausdrücke wie „IFA 
THEN“ zu einer Fehlermeldung des Compilers 
und müssen in „IFA > O0 THEN" umgeschrie- 
ben werden. 


Umgeschrieben werden müssen auch alle Pro- 
DOS-Kommandos wie OPEN, CLOSE, CHAIN 





usw. Gewissermaßen als Ausgleich für diese 
Unbequemlichkeit wurden die ProDOS-Kom- 
mandos in MICOL-BASIC stark vereinfacht, in- 
dem das leidige CONTROL-D-Verfahren weg- 
fällt. Übrigens wurde auch daran gedacht, IN- 
PUT STRING$ so zu ändern, daß alle Zeichen 
erlaubt sind. 

Das zu compilierende Programm muß mit ei- 
nem Kopfteil versehen werden, der mit dem 
Wort PROGRAM und einem Namen beginnt 
und von allen Deklarationen, insbesondere DA- 
TA- und DIM-Zeilen, gefolgt sein muß. 


All diese Änderungen sind zwar einfach, kön- 
nen in einigen Fällen, z.B. wenn viele HPLOT- 
Befehle umgeschrieben werden müssen, je- 
doch recht zeitaufwendig sein. Äußerst un- 
glücklich ist auch, daß die Adressen $300 bis 
$330, wo in Applesoft häufig kleine Maschinen- 
programme residieren, nicht mehr benutzbar 
sind. Sehr umständliches Umschreiben von 
Programmen ist die Folge. Immerhin ist der 
Compiler so „freundlich“, dem Benutzer recht 
ausführlich mitzuteilen, was ihm während des 
Compilierens nicht paßt. Ich pflege Applesoft- 
Programme zunächst ohne Änderung dem 
Compiler zu übergeben, der bei einem Fehler 
stoppt, eine Meldung, wie z.B „- '( EXPECTED 
IN LINE NUMBER 10“ ausgibt, die fehlerhafte 
Zeile auf den Schirm holt und den Cursor gleich 
an die Stelle rückt, die zu korrigieren ist. 


Leider kann der Compiler auch „genarrt“ wer- 
den. Beispielsweise ergibt „PRINT LEFT$(MID- 
$(STRING$,5,20),5)" nur „Schrott“, weil LEFT$ 
und MID$ die gleiche temporäre Adresse be- 
nutzen. Gelegentlich gelang es mir auch, mit 
sehr komplizierten, verschachtelten Applesoft- 
Ausdrücken den Compiler völlig „aus dem 
Häuschen“ zu bringen — zu über 99 Prozent 
akzeptiert er jedoch jedes Applesoft-Programm. 


4. Nachteil 


Programmiert wird mit einem Editor, der für 
mich die einzige kleinere Enttäuschung an MI- 
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COL-BASIC ist. Dies kann allerdings an der 
Neuheit des Produkts liegen, denn der Editor 
scheint einfach nicht „ferlig“ zu sein — zahlrei- 
che Möglichkeiten fehlen. So gibt es zwar auto- 
matische Zeilennumerierung, aber keine Umnu- 
merierung. Cut und Paste, Hold und Merge 
fehlen. Der Cursor ist nicht frei auf dem Schirm 
bewegbar, sondern nur innerhalb einer Basic- 
Zeile. Die Delete-Taste löscht von links nach 
rechts statt umgekehrt. Es kann nicht beliebig 
hinauf und hinunter gescrollt werden usw. 


Wer Kyan-Pascal besitzt, kann statt des MICOL- 
Editors den Kyan-Editor benutzen, der (abgese- 
hen vom Fehlen der Autonumerierung) sehr viel 
bequemer ist. Auch alle anderen ASCI!-Text 
erzeugenden Textverarbeitungsprogramme 
dürften benutzbar sein. Nur auf eines muß ge- 
achtet werden: Der MICOL-Editor verändert 
Text-Files so, daß Text, der mit dem MICOL- 
Editor geschrieben oder geändert wurde, von 
anderen Textsystemen nicht mehr verarbeitet 
werden kann. Meine analytischen Fähigkeiten 
reichen leider nicht aus, um herauszufinden, 
woran dies liegt. 


5. Fazit 


Insgesamt erhält man beim Kauf von MICOL- 
BASIC für sein Geld ein sehr gutes Produkt. Zur 
Lieferung gehört ein 250 Seiten umfassendes 
Handbuch in bester Druckqualität und eine un- 
geschützte Diskette. Das Handbuch ist sehr 
ausführlich, es beschreibt jeden Applesoft-Be- 
fehl noch einmal im Detail und enthält eine gute 
Einführung ins strukturierte Programmieren. 
Besonders lobenswert ist die Tatsache, daß das 
Handbuch auch blutigste Anfänger berücksich- 
tigt, indem es ausführlich erklärt, was Interpre- 
ter, Compiler, Assembler usw. sind. 

Meines Erachtens schließt das Produkt eine 
Lücke zwischen dem relativ primitiven Basic 
und dem sehr akademischen Pascal, die für 
manchen Programmierer einfach zu groß ist. 













Peeker 2/1987 


MICOL-BASIC-Sonderangebot 


Compiler 2.0 (Diskette und Handbuch). . ... . 
(ab Lager lieferbar, solange Vorrat reicht) 


GFABASIC-Sonderangebot 


Interpreter 1.4 (Diskette und Handbuch). 
Compiler 2.0 (Diskette und Handbuch). . 
(ab Lager lieferbar, solange Vorrat reicht) 
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Bücher 


Physikalische Experimente 
mit dem Mikrocomputer 


„On-Line“-Messungen mit dem 
Apple Il im Apple-Pascal-System 
von K.-D, Tillmann 

1986, 362 S., kart., DM 68,— 
Vieweg Verlag, Braunschweig 
Gliederung 

Leistungsfähigkeit des Systems — 
Die Hauptmenükarte — Schnelle 
analoge Messungen —- Schnelle di- 
gitale Messungen — Regeln und 
Messen: Kennlinien elektronischer 
Bauteile — Auswertungsprogram- 
me — Hardware — Software — An- 
hang: Literaturhinweise, Begriffs- 
erklärungen, Bezugsquellen, Pro- 
grammverzeichnisse, Sachwort- 
verzeichnis 

Bemerkungen 

Mit Hilfe des Computers können 
problemlos physikalische Versu- 
che bearbeitet werden, die zahlrei- 
che Messungen und umfangreiche 
Auswertungen erfordern. Diplom- 
physiker Tillmann behandelt in sei- 
nem Buch nur „On-Line"-Mes- 
sungen und ihre Auswertungen. 
Zunächst wird die Steuerung des 
Programms durch Menükarten be- 
schrieben, dann werden Versuche 
aus verschiedenen physikalischen 
Bereichen analysiett und die 
Grundlagen erläutert. Als mathe- 
matisches Handwerkszeug wer- 
den dabei Differentialgleichungen 
benutzt. Im nächsten Schritt folgen 
die Messungen und ihre grafische 
Auswertung. Das Buch eignet sich 
als Anleitung zur selbständigen 
Planung, Durchführung und Aus- 
wertung von Experimenten. Im 
Hardware-Kapitel werden alle ge- 
testeten Schaltungen mit An- 
schlußbelegungen angegeben, die 
benötigten Bauteile und ihre Be- 
zugsqauellen sind im Anhang ge- 
nannt. Im umfangreichen Soft- 
ware-Teil werden die Quellpro- 
gramme der Pascal-Programme, 
-Units und Assembler-Prozeduren 
aufgelistet. Damit wird dem Leser 
eine Anleitung zur Verfügung ge- 
stellt, die dem Erstellen der Hard- 
und Software zum direkten Umset- 
zen in die Praxis dient. Zur Arbeit 
mit den Programmen ist folgende 
Konfiguration nötig: Apple || mit ei- 
nem oder zwei Diskettenlaufwer- 
ken, die im Hardware-Kapitel ge- 
nannten Interfaces, das Apple- 
Pascal-System, ggf. eine 80-Zei- 
chenkarte und zur Druckausgabe 
einen grafikfähigen Drucker oder 
Plotter. 


68 


Mit den Informationen zu den 
Hardware-Bausteinen und dem für 
das Durchführen der physikali- 
schen Experimente notwendigen 
Pascal-Programmpaket wird der 
Computer schrittweise in eine 
„On-Line“-Meßstation umgewan- 
delt. Besonders interessant dürfte 
das Buch für Physiklehrer und 
Physikstudenten der Anfangsse- 
mester sein. Für den Apple Il/lle 
unter UCSD-Pascal sind die Pro- 
gramme auch auf Diskette zum 
Preis von DM 89,- vom Vieweg- 
Verlag zu beziehen. 


CP/M 


Ein Betrlebssystem stelltsich vor 





CP/M - ein Betriebssystem 
stellt sich vor 


von R. Weiß 

1986, 178 S., kart., DM 39,- 

Dr. Alfred Hüthig Verlag, 
Heidelberg 

Gliederung 

Suchhinweise für die wichtigsten 
Kommandos - Grundsätzliches zu 
CP/M und zu diesem Buch - Die 
residenten Kommandos - Die 
wichtigsten transienten Komman- 
dos — ED, der Editor der GP/M- 
Familie — DDT, der Debugger der 
CP/M-Familie — Weitere Hilfspro- 
gramme unter GP/M — Anhangsta- 
bellen 

Bemerkungen 

Die Portabilität von CP/M auf die 
unterschiedlichsten Rechner und 
die hohe Verfügbarkeit von An- 
wendungs-Software für dieses Be- 
triebssystem haben zu dem gro- 
Ben und weltweiten Erfolg von 
CP/M geführt. Vor allem im Be- 
reich der 8-Bit-Rechner hat sich 
CP/M durchgesetzt. 

Das CP/M-Handbuch von R. Weiß 
stellt die wichtigsten Kommandos 
verschiedener Versionen der 
CP/M-Familie dar und erläutert sie 
durch Beispiele und Syntaxdia- 
gramme. Die Arbeitsweise und die 
Kommandos des CP/M-Editors 


werden in einem eigenen Kapitel 
ausführlich beschrieben. Eine 
Übersicht über die wichtigsten 
Kommandos in den verschiedenen 
Betriebssystemversionen erleich- 
tert dem GP/M-Anwender die Su- 
che nach detaillierter Information. 
Tabellen zu den Fehlermeldungen 
des Editors und der Betriebssyte- 
me CP/M-86, CP/M-80 und CP/M 
Plus runden das Buch ab und ma- 
chen es zum geeigneten Nach- 
schlagewerk. 


Von Programmen, Computern 
und Datenträgern 


Das solide Basiswissen für den 
EDV-Einsteiger 

von A. Janson 

1985, 254 S., 112 Abb., geb., DM 
38,— 

Franzis Verlag, München 
Gliederung 

Einführung — Programmierung mit 
problemorientierten Programmier- 
sprachen — Organisationsformen 
von Datenverarbeitungsanlagen — 
Computer-Aritnmetik — Computer- 
Logik — Technische Realisierung 
eines Computers — Programmie- 
rung mit einer maschinenorientier- 
ten Sprache — Datenträger und Pe- 
ripheriegeräte — Datenorganisation 
— Beispiele für Problemlösungen — 
Literaturverzeichnis —- Sachver- 
zeichnis 

Bemerkungen 

Dieses Buch macht den Compu- 
ter-Laien vom Punkt Null an auf 
leicht verständliche Weise mit den 
wichtigsten Prinzipien, Werkzeu- 
gen und Fachbegriffen der EDV 
vertraut. Die Computer-Schlag- 
worte, die den EDV-Laien anfangs 
zu überrollen scheinen, werden 
klar und logisch erklärt. Dem Leser 
wird im Selbstudium ein solides 
Basiswissen vermittelt. Die Prinzi- 
pien der Programmierung werden 
anhand von BÄASIC- und Pascal- 
Beispielen erläutert. Angesichts 
der Stoffülle wird modernen Ent- 
wicklungen im Mikrocomputerbe- 
reich Priorität eingeräumt, ohne 
dabei das Grundlagenwissen zu 
kürzen. Schon nach kurzer Zeit 
kann der Leser selbständig Lö- 
sungsmodelle zu verschiedenen 
Problemen entwickeln, Program- 
me eingeben und austesten. 


Das Modem-Buch 


Schnittstellen, Software, Konzep- 
tionen 

von A. Schön (Hrsg.) 

1986, 227 S., 102 Abb., geb., DM 
48,— 

Franzis Verlag, München 


Gliederung 

Grundlagen — Anwendungen — 
Hardware — Software (für MS- 
DOS-Rechner, CGP/M-Rechner, 
Apple Il, C64, AIM-65/MC-65, mc- 
68000-Computer) — Bezugsquel- 
len — Literatur 


Bemerkungen 
Dieses Buch bietet neben allge- 
meinen Informationen konkrete 


Anwendungen für die Datenkom- 
munikation. Die notwendigen 
Grundkenntnisse zur Kommunika- 
tion über das Öffentliche Telefon- 
netz und über die erforderlichen 
Schnittstellen am Computer wer- 
den vermittelt. Der Aufbau und die 
Funktion eines Modems werden 
am Beispiel des Selbstbaumo- 
dems mc detailliert erläutert. 

Den Schwerpunkt des Buches bil- 
det das Kapitel über die Kommuni- 
kationssoftware für die gängigsten 
Computertypen. Die Software, die 
aus Geschwindigkeitsgründen vor- 
wiegend in Assembler geschrie- 
ben ist, ist umfangreich dokumen- 
tiert, so daß Anpassungen an ähn- 
liche Systeme problemlos möglich 
sein sollten. Daneben ist auch ein 
Programmtbeispiel für eine Mailbox 
vorhanden. Den Besitzern von Ap- 
pie II-, C64- und IBM-Computern 
werden mit der beschriebenen 
Hard- und Software fertige und 
funktionsgerechte Lösungsvor- 
schläge vorgestellt. Nach entspre- 
chender Einarbeitung können sie 
diese Lösungen eigenen Vorstel- 
lungen anpassen. Das Buch ver- 
deutlich, daß Datenkommunika- 
tion auch ohne hohen Aufwand an 
Hard- und Software zu realisieren 
ist. 


Computergrafik mit dem 
Mikrocomputer 


von R. Grabowski 
1985, 215 S., kart., DM 24,80 
Teubner Verlag, Stuttgart 


Gliederung 
Was ist Computergrafik? — Grund- 
software —- Koordinatensysteme, 


Fenster, Grafikprimitiive — Grafik- 
segmente - Randschnitt (Clipping) 
— Grafikeingabe — Abbildungen — 
Interaktive Grafikeingabe — Dreidi- 
mensionale Grafik — Abbildungen 
im Raum - Axonometrische Abbil- 
dungen — Text in Grafiken — Pro- 
grammverzeichnis — Literaturver- 
zeichnis 

Bemerkungen 

Dieses Buch versteht sich als 
theoretische und praktische Ein- 
führung in die Computergrafik. Es 
wendet sich an Leser, die bereits 
einige Programmiererfahrung ha- 
ben. Die theoretischen Aspekte 
basieren auf der analytischen und 
darstellenden Geometrie und auf 
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Elementen der Graphentheorie 
und setzen daher einige mathema- 
tische Kenntnisse voraus (z.B. 
Vektor-- und Matrizenrechnung, 
Skalarprodukt). Dem praktischen 
Programmieren dient eine umfang- 
reiche BASIC-Programmsamm- 
lung, die auch auf Diskette bezo- 
gen werden kann (lauffähig auf Äp- 
ple II+/e/c, Preis: DM 46,-). Die 
Programme sind strukturiert aufge- 
baut und damit gut verständlich; 
sie können direkt zur Problemiö- 
sung eingesetzt werden oder als 
Vorlage für eigene Lösungsmög- 
lichkeiten in BASIC oder einer 
strukturierten Sprache wie Pascal 
dienen. Die erstellten Grafiken 
werden in den Programmen in 
Form temporärer, interner Dateien 
abgespeichert. Diese können - ab- 
hängig vom verwendeten Compu- 
tertyp — dann in externe Dateien 
umgewandelt werden, Innerhalb 
der ständig expandierenden Com- 
putergrafik beschränkt sich das 
Buch auf die Erzeugung und Modi- 
fikation einfarbiger Grafiken, die 
auf dem Grundelement „Strecke“ 
basieren. Rastergrafiken werden 
nicht behandelt. Vom Thema her 
richtet sich Grabowski vor allem an 
Programmierer, die mehr Interesse 
an technischen als an künstleri- 
schen Grafiken haben. Leider läßt 
die Druckqualität des Buches zu 
wünschen übrig: Der Text ist in 
Schreibmaschinenschrift abge- 
druckt, Abbildungen und mathe- 
matische Sonderzeichen sind von 
Hand gezeichnet, die Programmli- 
stings werden als Ausdrucke eines 
sehr einfachen Matrixdruckers 
wiedergegeben. Da das Buch nur 
ein Band einer ganzen Reihe von 
Mikrocomputer-Büchern des Ver- 
lages ist, sollte man die Anschaf- 
fung eines gut lesbaren Druckers 
erwarten können. 


Online-Datenbanken 


Zugang zum Wissen der Welt mit 
Personal Computern 

von S. Schubert 

1986, 199 S., geb., DM 44,— 
Sybex Verlag, Düsseldorf 
Gliederung 

Einleitung - Online-Datenbanken - 
Datenbankproduzenten .— 
Datenbankanbieter — Nutzung der 
öffentlichen Datenübertragungs- 
netze — Private Übertragungsnetze 
— Die Recherche — Hardware — 
Software — Anhang: Glossar, 
Adressen, Gebührenangaben, Li- 
teratur, Register 

Bemerkungen 

Das Buch macht dem Leser, der 
keine technischen Vorkenntnisse 
mitbringen muß, das Gebiet der 
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Online-Datenbanken zugänglich. 
Dieser Anwendungsbereich wird 
zukünftig aufgrund des wachsen- 
den Informationsbedarfes eine be- 
trächtliche Rolle bei der Nutzung 
von Personal Computern spielen. 
Steffen Schubert stellt dem Leser 
das gesamte Umfeld der Online- 
Systeme vor: Er schafft einen 
Überblick über die verschiedenen 
Arten von Datenbanken, über An- 
bieter und die notwendige Hard- 
und Softwareausstattung. Öffentli- 
che und private Datenübertra- 


gungsnetze werden vorgestellt, ihr 


Aufbau wird erläutert. Das Kapitel 
Recherche erläutert die Schritte, 
die zur Auswahl der zutreffenden 
Datenbank führen, Gebührenver- 
zeichnisse für die Datenübertra- 
gung in verschiedenen Netzen der 
Deutschen Bundespost runden die 
Informationen ab. 


WPOTHS WERTELELT 
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Maschinenbau-Verlag 


CAD/CAM - Entscheidungs- 
hilfen für das Management 


von W. Poths und R. Löw 

1985, 176 S., 110 Abb., kart., 

DM 42,- 

Dr. Alfred Hüthig Verlag, 
Heidelberg 

Gliederung 

Betrieblicher Alltag und Allheilmit- 
tel CAX — Das Leistungszentrum 
Konstruktion — Das Werkzeug 
CAD/CAM - Die Wirtschaftlichkeit 
des Werkzeuges CAD/CAM - Der 
Entscheidungsprozeß zum CAD/ 
CAM-Einsatz — Leitfaden zur Ein- 
führung der CA-Techniken — Lite- 
ratur 

Bemerkungen 

Viele betriebliche Leistungspro- 
zesse in der Fertigungsindustrie 
werden bereits seit über 20 Jahren 
von Computern überwacht und ge- 
steuert. Die Konstruktionsabteilun- 
gen, innerbetriebliche Innovations- 
zentren, mußlen dagegen bis vor 


wenigen Jahren mit traditionellen 
Methoden arbeiten. Mit den geeig- 
neten CAD/CAM-Systemen kann 
nun die Konstruktion, die im Zu- 
sammenwirken mit der Fertigungs- 
planung die Mehrzahl der betriebli- 
chen Daten festlegt, alle produkt- 
spezifischen Daten mit Hilfe des 
Computers erarbeiten, speichern, 
verwalten und an die übrigen Stel- 
len der Unternehmen weiterleiten. 
Neben den finanziellen Aufwen- 
dungen hat der Einsatz der CAD/ 
CAM-Systeme weitreichende Ein- 
wirkungen auf die gesamte Uhnter- 
nehmensorganisation. Aus diesem 
Grund muß der Entscheidungspro- 
zeß sorgfältig geplant, durchge- 
führt und überwacht werden. Dazu 
trägt dieses Buch in entscheiden- 
dem Umfang bei. Nach einer aus- 
führlichen Analyse der Bedeutung 
und Aufgaben der Konstruktion im 
betrieblichen Leistungsprozeß er- 
läautern die Autoren die Möglichkei- 
ten des CAD/CAM-Einsatzes und 
seine vielfältigen Konsequenzen. 
Der Wirtschaftlichkeitsperechnung 
ist ein eigenes Kapitel gewidmet; 
individuell auszufüllende, tabellari- 
sche Erfassungsformulare (sog. 
Entscheidungsmatrizen) bieten 
konkrete Entscheidungshilfen bei 
der Frage nach dem Einsatz bzw. 
der Umstellung auf die neuen CA- 
Techniken. Ist die Entscheidung 
positiv ausgefallen, dient Kapitel 5 
als Leitfaden für die Probleme, die 
sich bei der Realisierung ergeben 
können, 


Sinclair QL-Begleiter 

von B. Allan 

1985, 133 S., kart., DM 35,- 

Dr. Alfred Hüthig Verlag, Heidel- 
berg 

Gliederung 

Einführung zum QL — Wir bauen 
BASIC-Strukturen — SuperBASIC- 
Grafik - Ein Turtle-Grafik-System — 
Überlegungen zur SuperBASIC- 
Syntax — Der 8049-Einchip-Com- 
puter -— Der MC 68008: Ein struk- 
turierter Chip — Die Programmie- 
rung des MC 68008 - Anhang 
Bemerkungen 

Der Sinclair-QL-Begleiter bietet 
mehr als ein Handbuch, das nur in 
die Arbeit mit diesem 16-Bit-Mi- 
krocomputer einführt. Es befaßt 
sich schwerpunktmäßig mit der 
Idee, Programmierung und An- 
wendung von SuperBASIC und 
dem MC68008-Prozessor von Mo- 
torola, der im Sinclair QL verwen- 
det wird. Anhand von Program- 
mierbeispielen wird die Überle- 
genheit von SuperBASIC gegen- 
über anderen BASIC-Dialekten 
leichtverständlich erläutert. Der 
QL-Benutzer wird in diese BASIC- 








wird 


Version eingeführt, dabei 
auch die SuperBASIC-Grafik be- 
handelt. Viele Beispiele für wichti- 
ge Programmierthemen und nützli- 
che Anwendungen sollen dem Le- 
ser die Benutzung der Sprache na- 
he bringen. Die Beschreibung des 
INTEL-8049-Einchip-Computers, 
der im QL Steuerfunktionen über- 
nimmt und besonders des MC- 
68008-Chips mit seinem Befehls- 
vorrat und den Adressierungsarten 
ermöglichen dem Leser, die Fähig- 
keiten seines Computers durch 
Assemblerprogrammierung voll- 
ständig auszunutzen. 


MS-DOS für Insider 


Wie der Spezialist mit dem Be- 
triebssystem umgeht 

von D. Smode 

1987, 115 S., kart., DM 38,- 
Franzis Verlag, München 
Gliederung 

MS-DOS, ein Überblick - Der Auf- 
bau ablauffähiger Dateien und ihre 
Anbindung an MS-DOS - Die CP/ 
M-ähnlichen Systemaufrufe - 
Struktur eines MS-DOS-Datenträ- 
gers, ein Exkurs — Die Xenix-kom- 
patiblen Systemaufrufe — Funktio- 
nen zur Programmverwaltung — 
Funktionen zur Speicherverwal- 
tung (memory management) -— 
Sonstige Funktionen zur System- 
verwaltung — Programmstart aus 
anderem Programm -— Die restli- 
chen MS-DOS-Interrupts 
Bemerkungen 

Das Buch basiert auf einer Artikel- 
serie über das Betriebssystem 
MS-DOS, die ab Oktober 1985 in 
der Zeitschrift „mc“ erschien. Wer 
hier eine Bedienungsanleitung für 
MS-DOS erwartet, wird auf die 
entsprechenden Handbücher ver- 
wiesen. Das Buch will nämlich dort 
anfangen, wo die Informationen 
des Manuals aufhören. Es be- 
schäftigt sich mit Interna des Be- 
triebssystems und beschreibt die 
Schnittstellen von MS-DOS zur 
Anwenderseite (system calls). Ne- 
ben Funktionsbeschreibungen zur 
Programm-, Speicher- und Sy- 
stemverwaltung von MS-DOS klärt 
es grundsätzliche Fragen wie den 
Unterschied zwischen COM- und 
EXE-Files, das Verschieben von 
Speicherblöcken und die Struktur 
der MS-DOS-Datenträger. Die Pa- 
rallelen von MS-DOS zu CP/M und 
Unix/Xenix, die hierarchischen 
Strukturen der Dateiverzeichnisse 
und der Aufbau der FAT (File Allo- 
cation Table) werden recht aus- 
führlich behandelt. Die nutzbaren 
MS-DOS-Interrupts werden aufge- 
listet, die darüber auslösbaren 
Funktionen besprochen. Die ange- 
gebenen Programmlistings sind in 
Assembler geschrieben. 
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Marcus:Juhnke - Heinz Redlin 


Apple Pascal 


für Fortgeschrittene 
Band 1 





Apple PASCAL für Fortgeschrit- 
tene 

Band 1 

von M. Juhnke und H. Redlin 
1986, 216 S., kart., DM 42,— 

Dr. Alfred Hüthig Verlag, Heidel- 
berg 

Gliederung 
Apple-PASCAL-Grafik — Ein-/Aus- 
gabemöglichkeiten — Systembe- 
dienung durch User-Software - 
Das UNIT-Konzept -— Anhänge und 
Tabellen, Stichwortregister, Ver- 
zeichnis der Programme 
Bemerkungen 

Dieses Buch wendet sich an fort- 
geschrittene Pascal-Programmie- 
rer und erläutert die komplexen 
Befehle und Programmiertechni- 
ken dieser Sprache, die den viel- 
fältigen Einsatz bei der Lösung von 
Anwenderproblemen ermöglichen. 
Apple-PASCAL ist die am weite- 
sten verbreitete Version von 
UCSD-Pascal auf dem Heimcom- 
puter-Sektor, deshalb befassen 
sich die Autoren schwerpunktmä- 
Big mit Realisationen, die auf dem 
Apple Il laufen. Einige Kapitel las- 
sen sich jedoch auch auf andere 
Computer mit anderen UCSD-Im- 
plementationen anwenden. Der er- 
ste Teil des Buches beschäftigt 
sich mit den umfangreichen Grafik- 
möglichkeiten von Apple-PAS- 
CAL, die dem Anwender mit der 
Unit TURTLEGRAFICS zur Verfü- 
gung stehen. Zur Programmierung 
bewegter Grafik für Spiele oder Si- 
mulationen wird der Äpple-PAS- 
CAL-Befehl DRAWBLOCK erläu- 
tert. Als Anwendungsbeispiel dient 
das Spiel FACEFIGHT. Hinweise 
für das Mischen von Text und Gra- 
fik und zur Erstellung eines eige- 
nen Zeichensatzes ergänzen die 
Informationen zum Thema Grafik. 
Der zweite Teil des Buches befaßt 
sich ausführlich mit den schnellen 
und komfortablen Ein-/Ausgabe- 
möglichkeiten von Apple-PAS- 
CAL. Schwerpunktmäßig behan- 
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delt wird der Aufbau und die 
Datenstruktur der UCSD- und 
DOS-Disketten. Ein Konvertie- 
rungsprogramm ermöglicht die 
Verarbeitung von DOS-Disketten 
unter Apple-PASCAL. Im dfritten 
Abschnitt wird die automatische 
Bedienung des Systems über EX- 
EC-Files und die Unit CHAIN- 
STUFF behandelt. Das Unit-Kon- 
zept und die Modularisierung von 
Programmen sind Thema des vier- 
ten Kapitels, ebenso die Erstellung 
von INTRINSIC-Units und ihre Ein- 
bindung in die SYSTEM.LIBRARY. 
Zahlreiche kommentierte Beispiel- 
programme und zusätzliche Utili- 
ties für eigene Anwendungen und 
die Anhangskapitel zum Befehl- 
satz, ASCII-Zeichensatz, den Feh- 
lermeldungen und Compiler-Steu- 
eranweisungen runden diesen er- 
sten Band ab. 


H.RICH:ER 
FRA ZDAMA 
GAD GAM 
Anwendungen: 
im Anlagenbau 





His chniig 
HiaschinentkmeWerlog 


CAD/CAM - Anwendungen im 
Anlagenbau 

von H. Richter 

1986, 91 S., kart., DM 32,- 

Dr. Alfred Hüthig Verlag, Heidel- 
berg 

Gliederung 

CAD im Anlagenbau — Datensiruk- 
turen — Organisation des CAD-Ein- 
satzes — Die 2D-Welt des Anla- 
genbaus — Die 3D-Welt des Anla- 
genbaus — Zeichenausgabe (Plot- 
ten) — Zeichnungsarchivierung und 
CAD - Schlußbetrachtung 
Bemerkungen 

Dieses Buch spricht den technisch 
interessierten Leser und den er- 
fahrenen Änlagenbauer gleicher- 
maßen an, indem es Einblick in die 
Besonderheiten und Spezialitäten 
des CAD-Einsatzes im Anla- 
genbau gewährt. Dem CAD-An- 
fänger stellt es die Möglichkeiten 
dieser neuen Technik vor, dem 
CAD-Erfahrenen hilft es, eigene 
CAD-Anwendungen kritisch zu be- 
werten und auftretende Schwierig- 
keiten durch optimierte Anpassun- 


gen auszubessern. Das Buch lie- 
fert keine allgemeingültigen Lö- 
sungsvorschläge für CAD-Aufga- 
ben, es versucht vielmehr, dem 
Leser anhand von ausgewählten, 
exemplarischen Lösungen ein 
Grundgerüst zu vermitteln, das 
nach eigenen Erfordernissen mo- 
difiziert werden kann. Die ausge- 
wählten Beispiele vermitteln auch 
nur einen Eindruck von den vielfäl- 
tigen Einsatzmöglichkeiten von 
CAD im Anlagenbau, ohne An- 
spruch auf Vollständigkeit zu er- 
heben. 


Softwareführer ’87 

für Personal-Computer 

Alles über Programme, Änwen- 
dungsbereiche, Bezugsquellen 
von G. Rolle (Hrsg.) 

3., erw. Auflage 1986, 736 S., kart,, 
DM 28,- 

Dr. Rossipaul Verlag, München 
Gliederung 

Allgemeine Informationen — Bran- 
chenneutrale Programme — Bran- 
chenspezifische Programme -— 
Technisch-wissenschaftliche Pro- 
gramme —- Systemsoftware — Lehr- 
und Lernprogramme — Hobby, 
Sport, Spiel — Alphabetisches An- 
bieterverzeichnis - Alphabetisches 
Programmverzeichnis -— Hardware- 
Register 

Bemerkungen 

Der Softwareführer enthält Be- 
schreibungen und Kurzdaten von 
über 2700 Programmen für Perso- 
nal Computer von ca. 500 Anbie- 
tern aus Deutschland, Österreich 
und der Schweiz (Stand: Septem- 
ber/Oktober 1986). Zu jedem Pro- 
gramm werden die wichtigsten 
Daten kurz genannt: Zweck, Um- 
fang, Programmanbieter und Be- 
zugsquelle, erforderliche Massen- 
speicher, Hardware, Betriebssy- 
stem, RAM-Kapazität, Program- 
miersprache, Preis, Schulungen, 
Erstinstallationsdatum, Wartung/ 
Pflege. Alle Informationen über die 
besprochenen Produkte stammen 
von den Soft- und Hardwareanbie- 
tern selbst, nicht von einem unab- 
hängigen Tester. Die Softwarepro- 
dukte sind nach Funktionen 
(Adreßverwaltung, Textverarbei- 
tung, Finanzbuchhaltung, Mathe- 
matik, Chemie etc.) und nach 
Branchen geordnet. Register er- 
leichtern die Suche nach einem 
bestimmten Produkt. Das kurze 
Einführungskapitel bietet sehr all- 
gemein gehaltene Hinweise zu 
den Themen Hard- und Soft- 
waremarkt und zum EDV-Einsatz 
im Betrieb. Dieser redaktionelle 
Teil enthält nur recht oberflächliche 
Informationen und fällt zudem 
durch zahlreiche Rechtschreibfeh- 
ler unangenehm auf. Für Entschei- 
dungshilfen oder detaillierte Infor- 


mationen muß man auf speziellere 
Literatur zurückgreifen. Kurz und 
gut: Der Softwareführer '87 ist für 
all diejenigen ein geeignetes 
Nachschlagewerk, die sich rasch 
einen vergleichenden Überblick 
über das Softwareangebot ver- 
schaffen möchten, um dann ge- 
zielte Informationen über einzelne 
Produkte vom jeweiligen Hersteller 
anzufordern. 


Einführung in PASCAL und Tur- 
bo Pascal 

von R. Zaks 

1986, 464 S., geb., DM 48,- 
Sybex Verlag, Düsseldorf 
Gliederung 

Grundlagen — Programmieren mit 
Pascal — Skalare Typen und Ope- 
rationen — Ausdrücke und Anwei- 
sungen - Ein- und Ausgabe - Kon- 
trollstrukturen — Prozeduren und 
Funktionen — Datentypen — Felder 
— Verbunde und Varianten -— 
Dateien — Mengen — Zeiger und 
Listen — Programmentwicklung — 
Anhang, Literatur, Lösungen zu 
ausgewählten Übungen — Stich- 
wortverzeichnis 

Bemerkungen 

Autor Rodnay Zaks gehört zu den 
Wegbereitern der industriellen und 
kommerziellen Anwendung von 
Mikroprozessoren und hat bereits 
viele Bücher über Computer ge- 
schrieben. Seiner Erfahrung ver- 
dankt der Leser ein sauber geglie- 
dertes, leichtverständiich ge- 
schriebenes Lehrbuch für die Pro- 
grammiersprachen UCSD (Stan- 
dard) und Turbo Pascal. Dieses 
Buch ist die deutsche Ausgabe 
des amerikanischen Standard- 
werks „Introduction to PASCAL in- 
cluding UCSD PASCAL", Es wur- 
de um die Besonderheiten von 
Turbo Pascal erweitert, einer 
schnellen Pascal-Version, die in- 
zwischen auf dem Mikrocomputer- 
markt weit verbreitet ist. Die ein- 
zelnen Kapitel führen mit steigen- 
dem Schwierigkeiisgrad von den 
allgemeinen Konzepten der Spra- 
che hin zu komplexen Datenstruk- 
turen. In den ersten sechs Kapiteln 
werden grundlegende Definitionen 
behandelt, die zum Verständnis 
von Pascal notwendig sind. Darauf 
folgend werden besondere Tech- 
niken und Datenstrukturen zur Ent- 
wicklung komplexerer Programme 
erläutert. Der Vertiefung des theo- 
reiischen Wissens dienen Anwen- 
dungsaufgaben am Ende jedes Ka- 
pitels. Ein umfangreicher Änhang 
listet alle Symbole, reservierten 
Wörter und Syntaxregeln von Pas- 
cal auf. Dieser Anhang ist auch als 
Nachschlagewerk geeignet. Das 
Buch ist ein gelungenes Lehrbuch 
für Pascal-Neulinge und -Fortge- 
schrittene. 
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Dieter und Jürgen Geiß 


Logo auf dem Atari ST 


1986, 146 S., DM 35, -, 
ISBN 3-7785-1262-5 


LOGO ist die erste Sprache auf 
dem Atari ST. Hier treffen sich 
die hervorragenden grafischen 
Fähigkeiten einer Programmier- 
sprache und die überlegenen 
Leistungen des neuen Rech- 
ners. Das Atari-LOGO unter der 
Benutzeroberfläche des GEM 
verfügt über den zur Zeit größ- 
ten LOGO-Sprachumfang und 
macht vollen Gebrauch von Fen- 
stern, der Maus als Eingabege- 
rät und den sogenannten Drop- 
Down-Menüs. Dieses Buch zeigt 
das Planen und Schreiben von 
faszinierenden und nützlichen 
Programmen. Das gesamte 
LOGO-System — nämlich Be- 
dienung und Sprache — wird 
vorgestellt. Hier stehen die Ant- 
worten auf Fragen, die im Origi- 
nal-Handbuch offen geblieben 
sind. Der Leser lernt die gesam- 
te LOGO-Sprache mit strukturi- 
erter Top-Down-Programmie- 
rung, Prozeduren, Rekursionen 
usw. Einige beispielhafte Projek- 
te zeigen, daß LOGO weit mehr 
ist als eine anschauliche Lern- 
sprache für Kinder. 


ID.u.J. Geiß, Logo auf dem 
Atari ST, 


ISBN 3-7785-1262-5, DM 35, - 
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3 starke Bucher für Ihren 


Hajo Lemcke, Volker Dittmar 
und Michael Sommer 


Programmierlexikon 
für Atari ST 


1986, ca. 500S., DM 48, -, 
ISBN 3-7785-1412-1 


Wie jedes Lexikon ist auch die- 
ses vollständig nach Stichwor- 
ten sortiert. Im Gegensatz zu ei- 
nem normalen Lexikon findet 
der Leser hier jedoch nicht nur 
eine Beschreibung, sondern 
gleich eine Programmieranlei- 
tung. Ebenso sind mehrere Ta- 
bellen enthalten, die das Auffin- 
den weiterer Stichworte erleich- 
tern und zusätzliche Informatio- 
nen beinhalten. Die meisten an- 
deren Bücher enthalten entwe- 
der eine Dokumentation über 
die GEM-Fähigkeiten des Rech- 
ners oder die Beschreibung der 
einfachen Betriebssystemrouti- 
nen. Hier jedoch findet der Le- 
ser alles. Es gibt nicht nur Hin- 
weise zur Programmierung von 
Dialogboxen, Fenstern oder 
Kommandointerpreten, sondern 
es werden auch alle systemin- 
ternen Fragen beantwortet. Dies 
umfaßt sowohl die Programmie- 
rung der im Rechner benutzten 
Chips, als auch eine Beschrei- 
bung der Schnittstellen und de- 
ren Benutzung. Es wird auf alle 
grafischen Möglichkeiten des 
ST eingegangen. Gleichgültig, 
ob nach den deutschen oder 
nach den englischen Begriffen 
gesucht wird, es sind alle vor- 
handen und verweisen gegebe- 
nenfalls aufeinander. 


[] Lemcke, Dittmar und Sommer, 
Programmierlexikon für den 


Atari ST, 
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Dieter Geiß - Jürgen. GelB__ 
Soitware- 
entwicklung 
aufdem AlariST 


Software-Entwicklung auf dem Atari ST 
1986, 388 S., DM 54, - , ISBN 3-7785-1339-7 


In diesem Buch findet der ernsthafte Programmierer al- 
les was er braucht, um gute und professionelle Software 
auf dem Atari ST zu entwickeln. 

Der vollständige Arbeitsablauf sowohl in einer C- als 
auch in einer PASCAL-Umgebung wird beschrieben, die 
notwendigen BATCH-Programme zum Compilieren, As- 
semblieren und Linken sind gelistet. 

Das Kapitel 3 beschäftigt sich mit der Entwicklung von 
reinen TOS-Programmen. An dieser Stelle werden so- 
wohl das Betriebssystem und der Aufruf aller GEMDOS-, 
BIOS- und XBIOS-Funktionen als auch die Bedeutung 
der System-Variablen erklärt. 

Kapitel 4 ist das Herzstück des Buches: die GEM-Pro- 
grammierung. Alle Funktionen der beiden großen GEM- 
Bibliotheken (VDI, AES) werden behandelt. 

Zwei komplette Sitzungen mit dem Recourse-Construc- 
tion-Set werden in Kapitel 5 dargestellt. 

Im Kapitel 6 werden dem Leser an zwei vollständigen, 
sehr sauber programmierten und kommentierten Bei- 
spielen mit einigen hundert Zeilen fast alle Probleme vor 
Augen geführt und gelöst, die bei der Fensterprogram- 
mierung auftreten. Diese Programme können als Muster 
für eigene Applikationen oder Desk-Accessories benutzt 
werden. 


UIID. u.J. Geiß, Software-Ent- 
wicklung auf dem Atari ST, 
ISBN 3-7785-1339-7, DM 54, — 


ISBN 3-7785-1412-1, DM 48, - 
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